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JAMES STANSBURY, CHAIRMAN - 

At Boston, I took off on the members enthusiastically, wildly, and 
with not too much result, but I can't preach to the people that attend 
today . We've tried to set up a meeting that meets the objectives and 
requirements that you people gave to us at Boston, and in conversation 
afterwards, We're still making mistakes, but I think we've done 
far better than we did then. Hope you will enjoy it and benefit from 
it. 

I'd like to say one thing about the interests of COMMON. I've had 
numerous inquiries from people who aren't certain whether COMMON 
is what they want to join, or not. They would join GUIDE possibly; 
if they had a large machine, they might join SHARE. They aren't 
qualified for these on the basis of machines, so they say, fine, we'll 
join COMMON. The special groups in this organization are the 
ones you people want. If you people have a common interest then get 
together with a birds of a feather session, organize a project, and, 
if you convince the Executive Board that you are serious, you'll get 
to be a project. The people here are the only ones to make those 
projects run - make them beneficial. That's about all I intend to say. 

I'll start off here by introducing members of the Executive Board, then 
I intend to have each one of our Divisional Managers present a short 
description of what his division is doing. Jim Tunney has some cor- 
rections on the agenda and IBM has requested some time to make a 
short presentation, which they will think will be of interest to all 
members - a new hardware announcement. 

On my left over here is Dick Pratt, Executive Board Member, next to 
him is Norman Goldman, President of the Eastern Region. Paul Bickford, 
who was appointed to fill the vacancy created by Don Jardine's re- 
signation. Bill Lane, Western Region President. On my right, Frank 
Maskiell, Executive Board Member, and on the far right, Chuck Maudlin, 
Secretary-Treasurer. Since Chuck is a rather ethical character, I'm 
going to apologize for him. There have been a great many problems 
with communications with the Secretary-Treasurer - lack of installation 
support. He's changed installations; he assures me that he has his 
backlog down now to a reasonable value, and that in the future we 
can expect reasonably prompt responses from him. Is Laura Austin 
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here? Jim Taylor? 

We'll start out with the Applications Division since we have 
the Division Manager present, 

FRANK MASKIELL - 

I wasn't prepared to dissertate on the Applications Divisions. We 
have six projects in the Applications Division. First, I might state 
the objectives of the Applications Division. You all will have a 
chance to read them more accurately in the COMMON Reference 
Manual, which will be forthcoming shortly, I understand. In the 
Applications Division/, we are particularly concerned with problems 
of installations which are not particular machine problems. We're 
concerned with what you're doing on the machine , on the computer, not 
what computer you are using to accomplish the results of these problems . 
To this end we have these six projects, specifically, they are the 
Techniques Project, which is concerned with mathematical packages, 
some statistical work. We have the Electric Utilities Project, what 
has operated in the past, particularly in the Eastern Region, as the 
Electric Utilities Team. We have the Petro-Chemical Engineering 
Project, hopefully serving the needs of installations in these industries. 
The Civil-Mechanical Project, who at this meeting, I believe, will 
be meeting withsorne of the members of Cepa. We have the Education 
Project, which gathers together the large number of university people 
who, in some sense of the word, have problems all of their own. 
Meeting at Cincinnati, for the first time, are a fair number of individuals 
interested in numerical control. This is a project which is just now 
getting started. We hope to see it grow as others find information 
available in this area, and can be served by this as a project. 

CHAIR - 

An now that Laura Austin is here, the lady sitting on the far right, I'm 
going to ask her to discuss the Administration Division next. She also 
has some announcements to make. 

LAURA AUSTIN - 

Thank you Jim. 

I would like to point out some of the Sessions to be held for the Ad- 
ministration Division first. The Administration Division is a working 
division of COMMON. It is one from which you, as a individual, will 
not realize a great deal of benefit for your installation, in terms 
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programs that you have obtained through participation in a project. 
It is a division in which we feel you can contribute a great deal to 
COMMON , and thereby benefit your installation through the overall 
operation of COMMON, and through what we hope will be an efficient 
operation of COMMON. The first session I would like to call to 
your attention is at 10:30 on Thursday, which is the session on nom- 
inations. We will be, within the next year, drawing up a slate of 
nominations for officers of COMMON. Since COMMON has grown 
to be such a large organization, it is difficult for us to get around 
to know each member. We would like to have people who are in- 
terested in serving on the Executive Board of COMMON, or who 
are interested in serving as Chairmen of Committees, or as Managers 
of Divisions, to make themselves known at this nominating sessions, 
so that we can become better acquainted with you, and so that we 
can have a slate of people to draw from for our nominations for the 
next year. We feel that you will benefit a great deal from taking part 
in COMMON, from getting right into the working side of COMMON, 
whether it is as a Committee Chairman, or as a Project Chairman, or 
as an Executive Board Member. 

The next Session that I would like to call to your attention is at 8:30 
on Friday. This is the Future Meetings Session. In this one, we 
will be discussing the locations of future meetings, the cities and 
hotels, and we also would like to solicit help from members of 
COMMON for Program Chairman and Local Arrangements Chairman. 
Again, you contribute a great deal to COMMON by offering your 
services in this area. If you will be at all available for any of these 
positions, we would like to have you come to this meeting on Friday. 
We can give you more detail as to what is involved in carrying out 
these duties at that time. Then, at 10:30 on Friday, is the Program 
Library Project. We are hoping this will be one of the largest sessions 
of the conference. In this particular session, we will be discussing 
the use of the PREP forms, what the PREP form is, what its purpose 
is , and how it can be of help to your. We will be discussing the 
Program Shipment Analysis form, in which we are trying to work with 
IBM in finding out where the problems are in the shipment of programs , 
and in the distribution of them. We will also be discussing the new 
360, 1130, 1800 Library, and I'm sure this is going to be of interest 
to most members. We will be discussing the standards for submittal, 
the procedures for ordering, and what catalogs will be available, etc. 

Another part of the Administrative Division has been the Reference 
Manual Committee. This has been largely made up of one person - 
Mr. B. R, Russell, who has contributed a great deal of time and 
effort in preparing for us a reference manual. I'm happy to say that 
today, I have a preliminary copy of the Reference Manual for COMMON 
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This will be mailed to every installation in about two weeks. You 
should be receiving the complete binder, dividers and the material. 
Now, this first issue of the Reference Manual is not complete. There 
are some sections that have not been submitted yet. We felt that 
we wanted to get it out to the members as soon as possible. The 
things that it does contain are something about the history of COMMON, 
what are the advantages of membership, the obligations of membership, 
what is the coming calendar for COMMON meetings, the organizational 
structure. We hope here to have completed before too long a list of 
all the projects that are currently active in COMMON ~ their scope and 
objectives. The Reference Manual will not include current reports on 
project progress* These will be covered in CAST, but the Reference 
Manual will give the scope and objective of each project; it will give 
you a list of all of the Project Chairmen, so you will know who to con- 
tact when you want to have some correspondence regarding a project. 
It also contains information for you about the information services of 
COMMON. In other words , how do you submit things to CAST, what 
can you expect to see in CAST and the Newsletter. How do you submit 
information to the Newsletter, and what is the purpose served by the 
Newsletter. And some information regarding the Program Information 
Dept* , better known to you as the Program Library. This will talk 
about the ordering procedures for material from the different machine 
type libraries, will talk about submittal procedures for programs, the 
PREP form, and the shipment analysis form. We hope the Reference 
Manual will be of great benefit to you. There is one other thing it will 
contain, a membership list which is indexed by company name and by 
user group number. The company names are in alphabetical order, and 
will give you the installation number. The full address of the installation 
representative is given under the installation code listing. Later, it will 
also have a geographic list, listed according to region of the cbuntry. 
I think that this describes what we have for you in the Reference Manual, 
and I l m sure you will be looking forward to receiving this within the 
next two weeks ♦ 

CHAIR - 

The next division which we will consider is the Installation Management - 
PAUL BICKFORD - 

Thank you, Jim. I want to welcome all of you this morning to our meeting. 
I would like to begin by outlining the objectives of our Division. We 
primarily exist for helping to form guide lines to our management in the 
areas of Personnel and Operation Management, We presently consist 
of two projects ♦ One in Personnel and Operations and, in a way, one 
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in Education* As a result of the Boston meeting , we outlined some 
activities for this meeting , and are currently responsible for such 
presentations as the Job Description and Personnel Selection Pres- 
entation. Also a presentation on Programmer Evaluation We also 
requested IBM to make a presentation on the Systems Reference Library 
and one on 360 Operator Training. We would like to solicit at this 
time any of you who are interested in participating in the activities 
of our group. We will have a planning session this coming Friday, 
We have about 30 people in our Projects* We would like to have 
more people participate actively in our group. So, if you new members 
or old members are interested in becoming involved in these activities, 
please be at the Planning Meeting on Friday. Thank you. 

CHAIR - 

I would like to particularly suggest to all members, new and old, - 
The Thursday afternoon session on the IBM Customer Engineer 
relationship should cover a discussion of the APARS, and of something 
called a Programming Systems Memorandum, which has just been 
made available by subscription. It lists all the APARS for a given pro- 
gramming system, and comes out every two weeks. It's the best 
source I know of to find out what bugs are where and when. It's ex- 
tremely useful* Jim Taylor is not here; Dick, do you want to discuss 
the Systems Division? 

DICK PRATT - 

Frank said he was unprepared, I'm extremely unprepared. About all I 
can tell you about the Systems Division is that it consists of machine- 
oriented sessions , and you will find these in your program. Some of 
them have probably been changed. These will be announced. There 
are sessions for 1620, 1130, 1800 & 360, and these will take most of 
the day today, and part of the day tomorrow. I imagine you can find 
the session you are interested in by just looking through your machine 
type. There are some sessions scheduled at the same time you might 
want to split yourself between - somebody has already complained to 
me about that - unfortunately, there is only so much time. You just 
sort of have to take a choice or go back and forthe. I don't really 
have any information as to what is scheduled in any of these machine - 
oriented sessions, except for the 360. The 360 will have some pres- 
entations by IBM on PL-I, which has just come out in DOS, and on 
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DOS, Version 3, which has just been announced, and will be 
available in April. And, while I am standing up, I would like to 
say that I'd like to meet very briefly after this session with the 
Chairmen of the 360 committees, so we can sort of get things 
straightened out. I assume the rest of the mcahine -oriented 
sessions are already straightened out. If they are not, I don't 
know what to tell you to do about it. 

CHAIR - 

I should say that Dick is not the Systems Division Manager. He's 
the Chairman of the 360 Project, as well as a member of the Executive 
Board . 

There is one comment that I would like to make about that - particularly 
in the 1620 area - there will be applications papers presented within 
the Systems Division. Where we felt that they were sufficiently 
machine -oriented that they would not be of benefit to anyone other 
than a user of a particular machine type, we put the applications papers 
in the machine -oriented sessions* 

Bill Lane has an announcement, and Jim Tunney has some modifications 
on the agenda. 

BILL LANE - 

I notice that this is about the first and last General Session according 
to the agenda. I notice also that, according to the agenda, Friday 
afternoon until 3 P, M. there is a general time set out for planning 
of the next meeting. The next meeting will be in San Francisco at 
the Sheraton Palace and, getting word in for the people of the Golden 
State, we'd sure like to have you come out. We're quite proud of 
San Francisco and if you want something to see that is different go 
out to Ashbury and see the Hippies. I went out to check about a week 
ago, or two weeks ago, I gues it was, and they're fantastic. For 
those of you who are worried, they are not around the Sheraton Palace. 
But, anyway, I would ask that you harken to the call for papers, and 
also the call for help, because the Executive Board can't put on the 
meeting by themselves, and I sure as heck can't put it on by myself. 
We'd like you all to help. We'd like to have you consider today, to- 
morrow, and Friday morning, rather than just Friday afternoon, as to 
what you would like in the next meeting, and what type of papers you 
think would be appropriate, Please, when you do find these out, either 
get information to the Division Chairman or, better yet, get information 
both to the Division Chairman and to me. 
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In CAST 7 there is a little questionnaire -type form that all you do 
is check things off and send it back to me - it requires a five cent 
stamp now, I guess. We'd sure appreciate it* I'm looking forward 
to a good meeting today, tomorrow and Friday, as well as in San 
Francisco . Come on out. It l s great in December - the weather's not 
bad. In fact it might even be warmer than in the East. 

LAURA AUSTIN - 

In conjunction with Bill Lane l s announcement, I might mention for 

this Future Meetings Session that we have for Administration Division - 

so that you can be considering this, maybe I should tell you where 

the meetings are going to be so you would know whether you'd want 

to volunteer to be Program Chairman or Local Arrangements Chairman. 

December of 1 67 will be San Francisco, as Bill mentioned - 

April of '68 will be in Chicago - so anybody from the Chicago area - 

we'd be interested in having volunteers to help on that program. 

September of '68 will be Philadelphia. 

December of '68 will be Houston, Texas. 

April of '69 will be Los Angeles. 

That is as far ahead as I will go right now, but, if you are from any 

of these local cities, we'd certainly like for you to consider volunteering 

for help on those programs. 

CHAIR - 

Thank you, Laura. 

Jim Tunney has some announcements and program changes - 
JIM TUNNEY, PROGRAM CHAIRMAN - 

Since there is going to be a series of program changes through out 
this meeting, I am going to try each time to go down the list in the 
same sequence these things appear in your program so that you can 
make the changes as I go - 

The first change is on Page 14, I believe, the Session W2.2, which 
is 1130 - OK/ page 12, in W2 . 2 , in which there is the 1130 project, 
there will be a presentation on 1130 Commercial Applications by Mr. 
J. Elan. 
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Then on Page 16, W4.4, the PL-I presentation has been moved 
from there. That session will be chaired by Mr, Mc Ilvain, rather 
than Richard Pratt, and will include comments on DOS. The PL-I 
presentation has been moved to T2. 1, which is on page 20 that's 
the next item* T2.1, which is again Don Mc Ilvaln's session, will 
have the presentation by IBM on PL-I. T2.1 is PL-1 under DOS. 

The next change is on Page 22, which is T3. 1. T3-1, of course, has 
the DOS Version 3, which is correct as stated. Down under T3.3, the 
paper on Expanded AUTOSPOT for 1130, which is B in T3.3, will be 
given by Charles Newman, instead of D. Carlson* Page 23 - The 
Education Project there - those presentations from IBM will be made 
by Mr. H. Codow& G. Wolf. Their names somehow were omitted 
here. That is in T3. 6. 

Down at the bottom of that page, in T3.8, R. Brennan is going to 
give that paper. 

Vd like to talk to Jim Fisher after session here. His paper right now 
is scheduled in F3. 1, and there is some question as to whether that's 
when it will be presented. 

Also, on page 27, in F1.7, the paper by Mr. Groft will be moved to 
another session. I don't know where yet, but the one that is scheduled 
for 9:15 on AC Circuit Analysis will really take place at 8:30 inthat 
session. I gues that's all I have. 

CHAIR - 

As usual there are always afterthoughts - 
PAUL BICKFORD - 

One little note - we are interested in forming a panel here at the 
meeting of people, two or three people, interested in discussing 360 
operator training. We would like for people interested to participate 
in this panel. It will be Session F2.2, on page 28. So if you are 
interested, and would like to participate in a spontaneous discussion 
here, please meet me up here after this session. Also, we are in- 
terested in getting together people who are interested in a CAI project - 
Computer Assisted Instruction - Bill Lane is interested in meeting with 
these people, so if you will see him here after the session, he will 
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speak with you then/ 
CHAIR - 

We are trying to cut this session short today, so that there will be 
time for registration for the people that didn't get there last night* 
IBM has requested permission to make a presentation on some new 
hardware - 

Paul Manikowski of IBM will make the presentation* 
CHAIR - 

I heard the laugh when Paul read the statement of intent. How many 
of you people have received CAST 7? Possibly half. There is a 
letter in that, which is basically the same as the speech by Watson 
to GUIDE, discussing IBM's policy regarding Program Announcements . 
I don't know - we have not requested any specific coverage here, so 
I'll give you the gist of it. 

IBM has adopted a policy that program announcements will be deferred 
until such time as they are reasonably certain that the program will 
do what the intend for it to do. In some cases, it may even mean that 
the program announcement will not be made until a program is actually 
in Alpha or Beta Tests. Because, in many cases, this would be too 
late to do the user any good, they have indicated that they will make 
a statement of intent, which indicates what they are trying to do, but 
makes no committment on their part to do it. Their men are saying - 
we are going to try to do this , it may not be exactly what we say 
here. We will do something in the area, but we may even abandon 
the project. It's not very good, but possibly better than slipping pro- 
grams , and having unsatisfactory programs issued. In addition to 
that, there was a statement made by Watts Humphrey, of IBM, at 
SHARE XXIX, to the effect that there would be no extension to the 
FORTRAN AND COBOL capabilities of OS. Any extension of capa- 
bilities would be done in PL-I, unless there was very serious 
market pressure to implement an extension to FORTRAN OR COBOL. 

With that - that's about what we had for the General Meeting. I 
know that there were a great many of you who didn't get registered 
last night. This hopefully will give you time to do so. Also give 
you time to catch up on the breakfast you missed. 

Dave , or Jim Tunney - You know when the morning coffee break will 
occur and where, Jim? There will be coffee at 10 o'clock, outside 
in the registration foyer area. I'll see you then. 

Pages 13 and 14 were not made available when Proceedings were published. 
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SESSION NUMBER W.2.2 



SPEAKERS 

NO FORMAL PRESENTATION. MEETING WAS CHAIRED BY LARRY ARMBRUSTER. 
DISCUSSION 

REQUESTS FOR INFORMATION AND ASSISTANCE COVERING THE FOLLOWING 
TOPICS WERE MADE 

MIXTURES OF FORTRAN £ ASSEMBLER LANGUAGE 
COMMERCIAL SUBROUTINES W/ OVERLAPPED I/O 
ALLOWANCE FOR MECHANICAL FAILURE IN IDEAL FORTRAN 
PLOTTER MALFUNCTIONS 

BETTER ASSEMBLER LANGUAGE INSTRUCTION MATERIAL 
SOURCE CODING OF THE OPERATING SYSTEM 
DISK COPYING PROBLEMS ON THE 1800 
EARLY MORNING START PROBLEM 
USE OF OTHER PLOTTERS RATHER THAN 1627 
GENE LESTER OF IBM WILL PRESENT A TALK ON PRIORTY, INTERRUPT 
PHILOSOPHY AT SESSION W4.2. 

A PROPOSAL TO SPLIT INTO SCIENTIFIC AND COMMERCIAL SUB-PROJECTS 
WAS VOTED DOWN. 

A SHOW OF HANDS INDICATES THAT ALMOST ALL PRESENT USE ASSEMBLER 
LANGUAGE TO SOME EXTENT. 



SESSION NUMBER W.2.4. fi W.3.4 



SPEAKERS 

360 USERS THEMSELVES 

MODERATED BY R.L. PRATT 6 D.R. MC ILVAIN 



DISCUSSION 

OPEN DISCUSSION ON PROBLEMS ARISING IN 360 INSTALLATIONS - MOST 
ATTENDEES CONCERNED WITH DOS, LACK OF PROPER IBM ATTENDENCE 
HINDERED RESPONSE TO MANY ITEMS. THE FOLLOWING ITEMS WERE 
REVIEWED 

DISCUSSION OF ERROR DIAGNOSTICS IN FORTRAN 6 LACK OF 
INTERPRETATION. 

BETTER REFERENCING AND INDEXING OF MANUALS IS NECESSARY 
FOR THEIR EFFICIENT USE. 

PSM NOW TO BE DISTRIBUTED BY IBM WILL GIVE USERS A BETTER 
REFERENCE TO EXISTING APAR'S, ANTICIPATED CORRECTION TIME , 
AND POSSIBLY IMMEDIATE TEMPORARY CORRECTION. THE RETAIN 
SYSTEM FOR THE FE'S AND SECOM FOR SE'S IS IN USE BY IBM TO 
AID THE DISTRICT OFFICES TO BETTER SUPPORT THE USERS. 

FORTRAN DOES NOT AUTOMATICALLY OVERFLOW UPON SENSING it 
CHANNEL 12 PUNCH. A PATCH EXISTS FOR LEVEL 9, BUT WOULD NOT 
FIX THE MOST RECENT ISSUE OF DOS. 

029«S ARE SENSITIVE TO REPRODUCING HEX-PUNCHED CARDS AND 
ARE LIKELY TO BREAK THE CODE PLATE, PRINTING OR NOT. IBM 
MENTIONED THAT THE 029 HAS A NEW FEATURE AVAILABLE (CODE 
INHIBIT FOR $3.00 A MONTH) TO LOCK OUT THE EXTENDED SET, 
REDUCING THE KEYBOARD ENTRY POSSIBILITY FROM 64 TO 48 CHARAC- j 
TERS. IT WAS REPORTED THAT AN 024 IS SATISFACTORY FOR 
REPRODUCING THESE CARDS BUT SOME HAVE HAD POOR EXPERIENCE 
HERE TOO. 

REVIEW OF PL/I EXPERIENCE UNDER DOS. EXPERIENCE WAS 
LIMITED BUT INDICATED GOOD ACCEPTANCE WITH THE COMMENT OF 
POOR OBJECT TIME DIAGNOTICS. 

IT WAS SUGGESTED THAT A FORM BE MADE AVAILABLE TO USERS 
FOR USE IN SUBMITTING PROGRAMMING TIPS TO THE NEWSLETTER. 
THIS WILL BE PURSUED BY THE DOS COMMITTEE. 

JOB ACCOUNTING (AUTOMATICALLY) IS STILL A DESIRED FEATURE 
IN THE SYSTEM SUPPORT. HOPEFULLY SHARE'S PRESSURE IN THIS 
AREA WILL AID OUR REQUESTS. 

THE DSR TYPE 3 PROGRAM IS AVAILABLE FROM THE LOCAL OFFICE 
FOR INCLUSION AT SYSGEN TIME FOR LOGGING OF DIAGNOSTICS. 
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SESSION NUMBER W.2.6 OS PROJECT 



SPEAKERS 

NO SCHEDULED SPEAKERS. 



DISCUSSION 

WE PLANNED AN AGENDA FOR THE FOLLOWING SESSIONS. THE THIRTEEN 
ATTENDEES DISCUSSED PROBLEMS OF CONCERN TO THEM BRIEFLY. AFTER 
ESTABLISHING AN AGENDA, IBM'S REPLY TO BOSTON RECOMMENDATIONS WAS 
READ AND COMMENTED UPON. EVERYONE IN THE OS COMMITTEE AGREES THAT 
COMMON SHOULD SUPPORT THE EFFORTS OF USASI X3.6 TO OBTAIN A 
NATIONAL STANOARD FOR HAND CODED GRAPHICS. 
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SESSION NUMBER W.3.2 
SPEAKERS 

JIM ELAM OF IBM SPOKE ON 1130 COMMERCIAL APPLICATION PROGRAMMING. 
DON GARDNER SPOKE ON SOCALS AND REMEDIES HE HAS FOUND. 

DISCUSSION 
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I'm Gordon Goesch, Product Publications Manager, IBM, San Jose, California. 
While I am not involved in the development of all types of IBM publications, 
other areas of our organization have the same mission for similar publications 
in various parts of the country. 

When one looks at a manual, it is not impressive, there doesn't seem to be 
much to it, but when you get into all tho ramifications in publications, it T s a 
little like an iceberg in the ocean - most of it is below the surface of the water. 

We haven't solved all our problems and I'm not sure that we will completely - 
but you may be assured that we (like yourselves) are certainly constantly trying 
to improve our operation. 

That is the reason I am always happy to talk to groups such as yours about our 
publications. Because it gives us an opportunity to discuss with you our 
Publication Library, its organization, its purpose, and revision service - as 
well as to update you on the library's operation procedures - because even with 
a good system - you must understand how to use it - if it is to be effective 
for you. 

I think that this type of a meeting can be a two-way street for information: We 
develop the literature; you provide feedback. We do get feed back from you via 
Reader's Comments forms - we want more of your comments and we certainly 
appreciate them. 

I don't know how knowledgeable you are about our publications; therefore, for 
the benefit of the new members and also for the updating of the veteran members, 
I'll run through a few slides which I_ think will tell you the publication story. 

Slide #1 To begin, we have what we call the IBM Branch Office Library 

BOL (BOL). BOL contains much information. Not all, but the major 



portion of BOL is made up of publications for users of our 
equipment. 

You have probably seen the publications display in the main 
convention lobby. The display, I am sure, contains publications 
of interest to you. Many of the publications on display have been 
published since your last COMMON meeting. Feel free to 
examine them in depth but please do not take them away, as 
there is only one copy of each and we want many people to 
benefit from the display. 



Slide #2 
FYI 



In order to call to your attention what publications we have 
For Your Information 
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Slide #3 and to help you avoid being swamped by ordering blindly as the 

Swamped man shown in the slide 



Slide #4 
SRL 

Slide #5 
Library 
Shelves 



we have developed the Systems Reference Library (SRL). As 
you probably know the SRL is a rather extensive library system. 

However, before you start pulling arm fulls of manuals from 
its library shelves 



Slide #6 


let Mr. 


SRL help you make the correct selection. 


Mr. SRL 






Helps Select 






Slide #7 


He will acquaint you with the SRL and tell you: 


What, 


a. 


What is available 


Where, 


b. 


Where you can get the information 


How 


c. 


and, how you can go about getting it. 




First, 


you must make some determinations: 


Slide #8 


a. 


What System or Systems interest you 


System 






Slide #9 


b. 


What size library do you want - everything for 


System X 




that system or just those parts that pertain to 



Considerable thought and effort was spent in the design of the 
Systems Reference Library - for both the needs of the reader 
and the type of publications necessary to support our products. 

Slide #10 Each SRL is an encyclopedia for a particular system - with 

separate publications for Major Subject areas. It consolidates 
all the basic reference literature necessary for you in: 

Planning 

Programming 

Installing, and 

Operating that system. 

Slide #11 The key you need for opening any of the System Reference 

SRL Key Libraries 

Slide #12 is the SRL Bibliography for the given system. 

Currently there are 13 major System Reference Libraries, 
ranging from the 1130 to fee System 360 - and of course each 
system has its own separate Bibliography. You will find, 
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however, that Bibliographies make cross references to 
pertinent publications of other systems. 



Each Bibliography is actually an Index of all the current publi- 
cations about a specific system. In it, publications are listed 
both by subject code and by machine number - and it contains 
abstracts describing each available publication. (We will 
discuss subject code a little later. ) 

You may have noted that now Programming Logic Manuals 
(PLMs) are listed in the Bibliographies. While they are sub- 
ject to restricted distribution, they are available if a real need 
is evidenced. The PLM details the internal logic of the pro- 
gram (like a large map of the listings). 



Slide #13 
Bibliography 
& SRL 
Newsletter 



Now, how do we update the Bibliography? 

Each Bibliography has its own Newsletter (its color is green) 
and it is issued monthly (when there are changes). The 
Newsletter updates the Bibliography, provides abstracts of new 
publications, and lists Type I p rograms with their latest 
modifications. 



Slide #14 
SRL 

Masthead 



Actually, the Bibliography newsletter is a current "accumula- 
tive Index of Publications and Programs" available for a given 
system. 

From the publishing mechanics point of view, Bibliographies 
are periodically scheduled for revision - when that occurs, the 
current information from the newsletter is merged into the 
Bibliography. 

Each SRL publication, listed in a system bibliography, is 
identified by a file number and a form number, located on the 
upper right hand corner of the publication cover - as shown in 
the slide. 



The file number performs two functions: the first part, speci- 
fies the system (s) number; the last two digits the subject code 

The Subject Code is made up of a group of two-digit numbers 
(00-99) assigned to the various system components, e.g. 

00 Includes, Bibliographies, System Summaries, 
Configurators 

01 Machine System (CPU) 
03 Input/Output Units 

05 Magnetic Tape Units 
20-50 Programming Systems 



A recent change now places Application Program manuals 
under code 60. 



The subject code 13 shown in this slide, indicates that this 
publication is about Special and Custom features. 



The form number is self explanatory; however, the form 
number suffix indicates the editorial level of the publication. 

Slide #15 Because of the dynamic nature of computer technical informa- 

SRL, TNL tion, frequent changes occur. 

When changes occur, technical newsletters (TNLs) are issued 
to update the publications involved. 

Consequently, not only is the Bibliography updated by its own 
newsletter but each and every SRL manual can have its own 
TNL. 



In most cases TNL packages are made up of an identifying 
cover page and replacement change pages for the parent 
publication - when you receive such a TNL you merge it into 
its parent manual and throw away the old pages. 

Incidentally when a publication is ordered, you will automatically 
receive the latest technical (suffix number) level copy as well as 
all the outstanding TNLs available against that publication. 

Slide #16 This slide shows the upper right hand corner of a TNL. It 

TNL indicates how the TNL identifies itself with its parent 

Mast Head publication. 

It carries the file number and form number of the parent 
publication it updates (and it is form number suffix sensitive) 

Below that is the TNL T s own number, publication date of the 
TNL, and the form numbers of any previous TNLs outstanding 
against the parent publication. 

Incidentally, all page replacement TNL pages carry similar 
identifying information. 



Outstanding TNLs are incorporated into the parent publication 
when it is being revised. TNLs may also be merged into the 
parent publication when it is being reprinted. 
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Information regarding the technical level of a publication and 
the TNLs that may have been merged into it may be found 
inside the front cover of any SRL manual. 



Slide #17 
SRL, NL 
Parent Pub. 
Manual 



Slide #18 
2 Biblios. 
2 NLs 

Slide #19 
In- Out 

Slide #20 
Wrapped Up 



Slide #21 
DPT 



Slide #22 
Series of 
DPTs 

Slide #23 
KWIC 

Slide #24 
KWIC & 
TNL 



This slide shows a manual, a corresponding TNL, and a green 
SRL newsletter. With this combination on hand you have all the 
publishing reference you need for the parent manual. 

Keep in mind that the best SRL publishing information source is 
the green SRL newsletter, because it not only updates its own 
parent publication (the bibliography) but also lists all the 
existing publications that are current for that system as well as 
their outstanding TNLs 

and of course that each major system has its own bibliography. 



Thus, the SRL system keeps you well posted on what is in 
(current) and what is out (obsolete) for an effective library. 

Basically, you have at your disposal a "living-doll" of a library 
system. 

Via the SRL, you can develop and maintain a library for one 
system or more - and tailor your library to your own needs. 

An additional source of information is the "Data Processing 
Techniques" (DPT) Bibliography (Form F20-8172). It indexes 
a series of publications of techniques for Study, Analysis, 
Design, Implementation, Programming, Documentation, 
Installation, Operation, Scientific, etc. 

This Bibliography is also updated by its own Green Newsletter. 
This slide shows some of the DPT manuals. 



Another excellent Index for your use is the KWIC Index of 
Marketing Publications (Form 320-1621). 

It is published quarterly and updated by a monthly TNL. 

The KWIC Index is based on an abbreviated 30-position publica- 
tion title - listing and cross-referencing publications by the 
important words in the title. 
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The KWIC Index is listed in five ways: 

1. Alphabetical 

2. Machine or System Type 

3. Form Number 

4. Type I & II Programs in System Sequence 

5. Type HI & IV Programs in System Sequence 

Slide #25 For example, this slide shows 3 separate word listings for a 

3 Way List single publication - "Programs for Petroleum Engineering" 
1-2-3 

Slide #26 and here, the same publication listed by machine number and 

2 More List by form number. 
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The latest KWIC Index was prepared from 11, 546 publication 
titles which generated 29, 122 listings. 

Actually, the KWIC Index lists many publications other than 
SRL publications, such as Executive Guides and Brochures, 
tools and techniques manuals, applications manuals and briefs, 
educational material, 

Another way of putting it is that all^ SRL publications are 
Marketing Publications but all marketing publications are not 
SRL. 

Hence the KWIC Index provides wide IBM marketing 
publication coverage. 

Therefore, to start a System Reference Library, it is necessary 
that you contact your IBM representative, and work through 
him, using the three key publications we have talked about, the: 

1. Bibliography 

2. its SRL newsletter 

3. KWIC Index of marketing publications- 

You can select and build your own reference library to support 
your system. 

However, please do not order your publications by writing to 
Product Publications (the address shown on the manual) or our 
Distribution Center in Mechanic sburg, as it will only delay the 
order. You must order through your local IBM representative. 

Now that you have established the base for your library, let ! s 
discuss its maintenance. 
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a. If you desire, you may continue ordering specific 
publications through the IBM Branch Office. 

b. However, you may prefer to subscribe to the 
"Publication Revision Service" that the System 
Reference Library offers. 



Slide #27 The Revision Service provides automatic shipping of revised 

SRL, TNL manuals and newsletters directly to you without having to go 
Revision through the IBM Branch office each time. 
Service 

However, Subject codes 00-60 only are supplied by the 
Revision Service. This excludes installation supplies, 
education literature, and other supplementary information. 



Here f s how it works: 



Slide #28 The IBM representative fills out a subscription card with you, 

Subscrip. using the green SRL Newsletter to indicate those publications on 
Card which you want the updating afforded by the subscription 

service. After the card is approved, IBM Distribution Center 
takes over and a single copy of each TNL or revision involving 
the indicated items will be mailed to you. 

Slide #29 Remember that only one copy per subscription can be mailed. 

Mailman Additional copies must still be ordered through your IBM 
w/Pkg. representative, just as were your initial manuals. Any changes 

in your Revision Service are made via a new subscription card. 
Again, if multiple copies are ordered through the Revision 
Service, it only complicates and delays matters. 



It is important to set up a library and assign responsibility for 
updating and maintenance to make the service effective. 



Slide #30 Now, you are all set, you know what is available, you know 

SRL & Rev how to select the publications, and you know where to get them. 
Pkg 



Slide #31 The key is yours. 

The Key 
Is Yours 



Slide #32 Use this key to open up a tremendous amount of timely 

Key to knowledge about your system through the IBM Systems 

Knowledge Reference Library. 
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Slide #33 I hope that the result of all this, will make you as happy as the 

SRL man in the next slide - careful planning of your library 

may help! 

Most of you have probably noticed the Reader's Comment Form 
that is appearing on the back of many manuals these days. 
Some of you may have filled one or more out. The response 
to these has often been very gratifying and we appreciate it. 

I want to encourage you to use them as it is one of the means, 
along with meetings like this, by which we get the feedback from 
our readers that is essential if we are to improve our publica- 
tions and make them more useful to you. 

This form is self- addressed and post-paid and will be directed 
to the correct publications group. As a reminder, please 
don't use the form to order manuals as we have to redirect such 
orders back to the Branch Office with a consequent delay. 

On behalf of the publications groups, I want to thank you for 
your attention and for your comments and pledge to you our 
whole-hearted effort in providing first rate publications support 
for your systems. 

Thank you again for giving me this opportunity to talk to you. 
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INTRODUCTION 

NIU System/2UOj Northern Illinois University and the 
system we developed. It took on the project number "2U0" 
identifying the application area with which we were dealing 
within the University, Audio-Visual Aids. This is a data 
retrieval system developed on the 1620 to solve the inventory 
problem faced by the film library at NIU in the AVA Department • 
The manual solution to the problem was unable to handle the 
growth both in terms of the student body (see next page) and 
something refered to as the "information explosion 11 . This 
is the first point we see under "justification" for the system, 

the economic aspect. Extra clerical staff to handle the 
volume could not be hired for the same expenditure involved 
in the operation of System/2 U0 # 

The second point under justification is better and faster 
service using System/2 U0 # User requests that are received in 
the morning are confirmed by the afternoon mailt This is in 
comparison to the normal two week response time by other 
libraries in the area* 

The third and last point is the additional predictive 
information to be gotten from the system based on the records 
kept by the system. So much for justification. How new or 
unique is the system? 
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A review of the literature shows that NIU System/2i|0 was, 
at the time it went on-line in April of 1966, the only- 
application of its kind in the country, and is to date the most 
comprehensive of exisiting systems, irrespective of hardware. 
How did we arrive at this solution? To answer this question 
we will look at the problems facing analysts when embarking 
upon the creation of any data retrieval system to solve an 
inventory problem and then look at how we faced these problems « 
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THE PROBLEM 



To give structure to the following discussion we will 
separate the problems and their respective solutions into 
four classes* This taxonomy covers the basic problems 
faced in the design and implementation of a data retrieval 
system. 

Our first classification covers the creation of files; 
something common to the early phases of most systems, because 
in creating a new system or converting an old system from 
manual or other means, the files must be put into machine 
usable form. The second class of problems concerns the actual 
servicing of requests by users for the item contained in our 
inventory. The third is the maintaining of 'the inventory. 
We must have a means of deciding how many of a given item to 
have on hand* The last basic class of problems is that of 
maintaining records. Our problems demand that we maintain 
records on both our users or customers and our inventory. 
Before elaborating on these four problem areas and providing 
the corresponding solutions to the problems, let f s look at 
the special conditions which are placed on our example 
application, the NIU film library. 




A RECIRCULATING INVENTORY 



A film library is a special sort of inventory. It embodies 
a recirculating scheme by which films are supplied to the user 
and then returned to the shelves of our inventory* Therefore 
the nonnal input which maintains the "on hand" number of items 
that we have decided upon, is from the user, not a supplier. 
In other, or what we may call "one-way 11 types of inventories, 
the input which maintains the "on hand" number in the inventory 
is from an outside supplier* The only time which the recirculating 
inventory gets its input from an outside supplier is when we 
wish to change the "on-hand" level because of increased demands. 
In designing the system, this recirculating scheme forces 
special considerations in three areas. All three fall within 
the scope of the inventory file maintenance. 

First, because we "reuse" items, we must keep track of 
each and every item within a given type, rather than simply 
being concerned with the total number of that item available. 
We must know whether or not print three of a given film will 
be back in the library in time to fill another request. 

Second} we need a method to tell us when to go to the 
outside supplier and beef up our inventory. This is more 
complicated in the recirculating inventory than in the one- 
way inventory. 
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The third manifestation of our special conditions is 
possibly a blessing in disguise ♦ Because quite often orders 
are placed more than a year in advance, our files must be large 
and complex, but the potential blessing comes in the preview 
of demands to come that we can glean from these advance orders. 
But this is only potential. We must take advantage of it. 

Having now looked at the justification for the system, 
the structure of the discussion to follow and trie special 
conditions a film library places on an inventory system, (and 
hopefully having put you in mind of the special conditions of 
your particular inventory problem) let's see what we did to 
cope with the four general classes of problems embodied in 
the design and implementation of a successful inventory system. 
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THE NIU SOLUTION 



First is the area of creating new files. We will consider 
our basic tools in terms of hardware and then software. The 
hardware consists of an IBM 1620 Model II with 60K, which has 
been undated to include a 1311 disk drive and 1UU3 printer. 
The 1311 disk drive is the medium that we use for our mass 
storage of records. The software will also be considered in 
two parts; that which is supolied by IBM and that which is 
supplied by the Northern Illinois University Computer Center. 

The Monitor I is the normal suoport system supplied with 
the 1311 disk drive but as used, has been somewhat modified 
from the original IBM version. Though we do compile FORTRAN 
we do this utilizing another disk thus enabling us to delete 
FORTRAN IT.-D, its subroutines, and some unused utilities from 
our production disk and in turn make this room available to 
System/2U0 # Since three of the four basic programs are in SPS 
and 90 percent of our running is execution rather than compiling 
we do not really lose any flexibility. 

The four programs developed as the full compliment in 
NIU System/2U0 are named AV-LOD, AV-DLY, AV-RPT and QIKLOD. 
AV-RPT is the only one written in Fortran and is used for 
our quarterly reports. AV-LOD and AV-DLY are the only ones 
that are disk resident and used on a daily basis. QIKLOD is 
a key part of our back-up. 
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Since we have only a one drive system, a strict disk to disk 
back-up can not be provided, but with QIKLOD and the card output 
that is produeed during our daily procedures we are able to 
provide card back-up. Figure I shows the status of our disk and 
if you are familiar with the normal organization you can see 
where things have been rearranged or deleted. This includes 
limiting the Monitor work area to the minimum 11 cylinders. 

There are basically two files in the NIU/CC software. 
The one is a file that contains all the information pertaining 
to our users. This file is broken again into two parts that may 
be termed our "billing and shipping files' 1 . We have run into 
the necessity of creating these two files by the nature of our 
users. 

In dealing with schools or other large institutions we are 
often asked to bill a central office or school district, but in 
turn they want the items, in our case films, sent to individual 
users within their system. So we are faced with the problem of 
billing to one address and shipping to several addresses within 
that particular users juristiction. We will look closer at 
these files as we get into the structure of the actual records. 
The other file that we keep on the disk is a complete file of 
all the items, again in our case these items are films. 

Our film library is divided up into 21 logical categories 
by subject matter. We use these logical categories as actual 
physical categories in our disk organization, ^or each category 
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that you would find in the film catalogue you find a corresponding 
physical category on the disk. Down near the bottom of Figure I 
you will find a "Disk Table of Contents' 1 at sector location 19U06 # 
This disk table of contents is our systems table of contents 
that tells the software what the status of our files is. In 
other words, what condition the last program that operated on 
these files left them in. Referring then to the next figure, 
Figure 2, we see the "Dynamic Table of Contents", which is 
in reality the table we see located at 19U06 of Figure I. The 
static table exists only in the programs themselves because 
it is actually unchanging from the time of the original compiling 
of the program* On the other hand, any of the programs in 
System/2U0 may modify the information stored in the dynamic 
table . of contents, but every time it is modified it is restored 
to the disk destroying the old information. The static table 
contains one entry per category. 

Each entry is the beginning sector address of a given category. 
Looking for category 1, we would pick out the first field and 
would find that a given address in that field is the beginning 
sector address of category 1. 

The dynamic table of contents contains three entries per 
category on the disk. The first field represented by "A's" is 
the active level to which the category is filled. In its initial 
form, when a category is empty before we have loaded any films 
to it, we would find that the field of "A's" or the active level 




Figure 2 
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would be exactly equal to the field of ,! B f s n or the beginning 
address of a given category, for the active level would be the 
beginning address of the category. The second field, or the 
field of "N's" indicates the last film number within that 
given category* Each category starts with a film number one 
and goes on to the last number within that category* The last 
number is the number that appears in this field so that in our 
search we are able to check immediately the last number and see 
whether or not the film specified is a legal film for that 
category, i.e. if it falls within this range. The last field 
or the field of "L's 11 as it appears, is the limit to which we 
may fill this category ♦ When a category is completely filled, 
the converse of the situation we mentioned earlier occurs. The 
field of "A f s" and the field of "L's" are equal because the 
category has been filled to its limit* Within that static table 
there are two additional entries, one is the beginning address of 
the customer, or the billing filej the other is the beginning 
address of the shipping file* 

Now going to the organization of our two customer files, 
if we have an individual requesting a film and the request 
indicates that he is to have the film sent to the address he is 
to be billed at, this customer is entered in only one of our two 
files - he is entered in our billing file. If though, we have a 
customer that wishes to be billed at an address separate from the 
address to which he is having the film shipped, he is entered in 
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both files • We give each customer a four digit number. If he 
is a customer with the same billing and shipping address this 
is all the number that he gets* If the customer does desire a 
separate shipping address, one separate shipping address or 
several, then on the initial cards that we use to create his 
records on our disk file the two cards that contain his billing 
address also contain a 1 in card column This indicates that 

there will be shipping addresses to follow these billing 
addresses and these will have the same four digit customer number 
but will also have a two digit shipping number tacked onto the 
end of this. These records are then filed on our shipping address 
file. Then we have a billing address number which is tied to 
one or several shipping addresses and a sequence number which 
makes each shipping address unique. If we look at Figure 3$ we 
see the example of customer 101 in our billing file with a 1 
coded following the 101 which indicates that in the shipping file 
we will find at least one shipping address if not more for him. 
When we make a request for the customer number 10102 this request 
is serviced by going to the billing file, finding customer 101, 
finding out whether or not the 02 is valid for this customer - 
in other words whether or not the customer does have separate 
shipping addresses by the fact that there is a one following his 
number on the file and then going to the shipping file and finding 
customer two or shipping address two of customer 101. 

J-Card Formats appear in Appendix A. 




Figure 3 
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Moving on to the organization of our film file, we'll look 
at the key to this file or our film number. In Figure U, we 
find an example of our film number. The first digit of this 
film number is a length and color code. The two digit category 
which is the logical category mentioned above tod the physical 
category that we find on the disk. We have then within the 
category a four digit number which uniquely identifies a 
particular title of a film. Tacked on to the back of that we 
have a two digit number which uniquely identifies a given 
print for that given film. Here again we see our special 
conditions showing up. In this recirculating inventory we have 
to keep track of not only the total number of a given item but 
of each and every item as a unique entity. This is our print 
number. We have multiples of a given item, i.e. a given title 
of a film. Very popular films have several prints. 

A footnote to this; the DAVY group which is to the educational 
film industry as COMMON is to IBM, is trying to come up with a 
coding system to be presented to the Federal Government as a 
suggested national standard for the entire educational film 
producing industry. Though we did develope Northern's numbering 
scheme independently, we find a great resemblence to the 
DAVY number in the one created for Syatem/2U0 at Northern. 
We have the two digit medium which corresponds to our category, 
one digit storage area which corresponds directly to our length 
code, a sequence number of four digits (this is our "title number' 1 ) 
and the two digit print number which we just refer ed to. In 
addition they carry a two digit year of acquisition number. This 
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number we carry internal to our record but do not put on our 
key. 

If we look then at Figure 5> we have the two formats 
of our film records. The first is the general information on a 
given film, information similar to that which we would expect 
to find on any inventory system. We have the film key which 
we just mentioned above, the film title which corresponds to 
the item description, a rental amount which would correspond 
to a selling price, the cost of the film to us which would 
correspond to a users purchase price and the number of times 
this particular item was requested by a user plus the number 
of times we were unable to fill a customer's request because 
the film was not available at that time. In addition we have 
the alternate film number. 

The alternate film number is a number that is used if the 
customer indicates that the time period that he has requested is 
very important to him but that the particular film is not 
important and that a film covering comparable material would 
be satisfactory to him if we can make a suggestion. This 
alternate film is automatically booked for him on the given 
dates if he indicates that we can make this substitution for him. 

The second record is also an outgrowth of our special 
conditions - added problems to the normal inventory system that 
we had to cope with. This is the record that we keep on each 
individual print, each individual item within an item type. This 
gives us summary information, frequency of use, the contract 
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under which we obtain this particular print, may it be through 
a government grant, under some sort of leasing condition, or 
some sort of share-the-rent basis. We indicate the vendor from 
which it was purchased and follow this by the purchase date (which 
DAVY has put into their record number as was mentioned earlier). 
The rest of the record is devoted to the particular dates on 
which this item will be out of the inventory. We say 11 will be" 
very correctly because as this particular item is checked for 
requests, we also check for bookings of that film which have 
been sent out and returned. These bookings are cleared from 
our records at the time they become obsolete. Date coding is 
as follows: 

The date is calculated relative to April 1, 1966 and 
translated to a four digit number, i.e. April 1, 1966 88 0001. 
This shipping date is stored in the four digit disk code and the 
return date plus one (extra day in shop for checking) is expressed 
in a one digit increment to the shipping date. This code is 
capable of a twenty-one day block out using five digits. One 
day indicated by the four digit date plus a maximum of a 20 
day increment. Increments are expressed as follows: 



Code 



# Days Increment 
From Shipping Date 




1 

2 



1 

2 
3 



• 



9 
1 



10 
11 
12 



9 



20 
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Any date earlier than April 1, 1966 is translated and printed 
as blank. 

Examples : 

April 1, 1966 to April 6, 1966 ■ 00015 
April 9, 1966 to April 28, 1966 - 00099 
AV-LOD is the program that creates , maintains, updates, and 
restructures (when necessary) the above mentioned files • 
Figure 6 shows the normal invoking of a disk resident program 
in addition to the extra step included in all System/2U0 
programs; retrieving the DTC # 
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SERVICING REQUESTS 



Looking back now to the four parts of our problem, we 
have run through the first one, creating our new files. Now 
we want to move on to servicing our requests. Let us look 
first at the types of input or types of requests that we 
can get. In the final form the input to the computer is in 
card form. How do we get it in card form? There are three 
ways, with a fourth under consideration. First we may have 
a phone call from our on-campus users or off-campus users for 
an immediate request delivery. The pertinent information on 
that particular request is coped down by a clerk and then 
edited and submitted to keypunching. The second form is that 
of a request received through the mail which is edited and sent 
again to keypunching. The last of the existing types is 
received in card form. Let's take a look at exactly how we 
accomplish this, how we relieve ourselves of not only 
keypunching but also the clerical editing and put the responsi- 
bility for the validity of the information on the user. In 
order to do this we supply the user with two bits of information 
one is the KWIC index, a sample portion of which can be found in 
Figure 7« The other is a master card file, with a card per film 
or partially punched request cards. 

Here we have the titles of our films alphabetically listed 
by each significant word in the title. In other inventories 




Figure 7 

KWIC INDEX 



LPGFND OF JOHNNY 


APPLESFFD 00650* 


51 2007701 


moMp FL«=TTRTfAL 


APPLTANCFS 00190* 


217001301 


G&S LAWS TH F T R 


APPLICATIONS 0200230* 


406025101 


GRANT LFP AT 


APPOMATTOX 04 003 9 5* 


603025401 


RAL YOUR n T p T HLTH 


APPPMCr 0100190* 


208006801 


MFCHANIOAL 


APTITUDES 0100190* 


205023401 



nFMONSTR AT T NG 
H c AT F N p R G Y 

LAWS OF 



GARDEN PLANTS HOW. THEY GROW 0100190* 
GAS LAWS 00285* 
GAS LAWS 00575* 

GAS LAWS THFTR APPLICATIONS 0200230* 
GASES 010 0190* 
GASOLINE AGE 0200485* 



214016901 
406009401 
606037701 
406025101 
206014701 
503042101 



H c A T ENERGY GAS 
GAS 

PRES I DENT I AL 
STYLE OF 
DFVFLOP I NG 



LAWS 00575* 

LAWS TH^ IR APPLICATIONS 0200230* 
LEADERSHIP 0400425* 
LEADERSHIP 00450* 
LEADERSHIP 0100190* 



606037701 
406025101 
6-03030101 
605014901 
205021301 
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this will be a description of the item. A user can then, 
assuming half -way reasonable descriptions of your items, 
look up a given idea and find several films on the idea or 
subject. In the example in Figure 7, if he were looking for 
something on gas laws or applications of gas laws, he could 
look under APPLICATIONS and find a film referenced as U0602$101* 
The user could look under GAS and find "Gas Laws and Their 
Applications" also referenced as 1|0602$101. Under LAWS he would 
find the same film with the same number • Using this reference 
number and going to the card reference file which we supply the 
user, the customer need only duplicate this master card and 
punch the dates required into the reproduced card. If he 
wants his name to appear on the address he can also include at 
the end of the card in the 11 attention to 11 columns the particular 
name that he wishes on the address . (The card is identified 
by a $ in card column 1 and the format can be found in 
Appendix A with the others in the system*) This card is then 
sent directly to us and becomes input to our system* 

Yet under consideration is a mark sense form to be 
distributed to faculty and customers. The dates and film number 
would be coded on this and processed by our 1230. The cards 
output from this would be in request card form and processable 
by the machine. These then are our inputs. We have covered 
the method of invoking the system in which we pull the program 
off the disk and begin reading our request cards. Figure 8 
shows the program steps involved in processing a request. The 
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program upon reading a request pulls the required film from the 
disk file, the required customer from the disk file, and checks 
to see if the film is available for the dates requested, if so, 
it begins printing out a confirmation slip, if not, it prints 
out the confirmation slip indicating that the film is not available 
for that date but if it is we also punch out an activity card 
which is used in our internal system • (The activity card form 
also appears in Appendix A)# The form of the confirmation is 
in the Appendix B and this is a multi-part form* The upper 
part seen in the Appendix is the top sheet, the lower part on 
the Appendix representation of this form is the bottom sheet of 
the four part form. The top sheet is sent out directly to the 
customer immediately after processing his request to indicate 
the status of his request and the lower right hand corner of 
the fourth carbon becomes a shipping label for the item. This 
portion is torned off, the back of it is already gummed and this 
is stuck directly on the film mailing case. In the case of 
customers who supply us with card input to the system, we also 
supply them card form output that goes into their accounting 
systems and provides them with some statistics on our performance 
for them. Our billing operation is then performed on the basis 
of these activity cards that we have produced during the successful 
booking of a film for a customer. When the film comes back, the 
packing slip which was a part of the confirmation is matched 
against one of these activity cards. When a successful match 
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has been made, i.e. the film has been received back from the 
customer, these cards provide input to our billing system, the 
activity chart of which appears in Figure 9 • As these activity 
cards are read, the customer information on the disk providing 
us an address to bill to is pulled off the disk. Pertinent 
film descriptions that apply to the customer's bill are also 
pulled and this detailed information is printed on his bill. 
We then print the bill and also punch a card which becomes 
input to our University accounts receivable system. (The 
billing form is included in Appendix C.) This then covers 
our second point of servicing the requests to our customers. 
We now move to the third point of the problem and the third 
point of our solution - maintaining our inventory. 




Figure 9 




MAINTAINING THE INVENTORY 



If we look at Figure 10, which is labeled REQUEST GROWTH 
CURVE, we are trying to develop here a buyer's indicator by 
keeping records on particular films. This curve describes the 
demand on a new item from the time of the user's awareness of 
its availability to some time out beyond that. As the demand 
for this film grows; as we go up on the axis labeled "number 
of requests", we can also mark it off in intervals indicating 
number of prints of that film, or number of that item which 
we have to keep in our inventory in order to satisfy these 
requests. When we reach the doted line, we have a choice to 
make, whether to purchase, lease, or by so/ne other means obtain 
the items in order to catch the peak of this growth and get 
these requests, or at this time to stop our purchasing and to 
realize that we are going to have to take some "not availables" 
or find that we are unable to satisfy the customer's request, 
but in so doing not have obtained films that will not be in 
demand beyond time "y" • It is our job to come up with an 
equation for this curve. At the current time based on our 
recrods, we can find a breaking point - point B - where the 
curve starts to come back down or it starts to change direction 
somewhat. When this happens we can cut off or we can lease items 
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for a short amount of time in order to fill in this area and 
pick up these extra requests. But our job is simply to supply 
this buying information to management so that intelligent 
decisions can be made on growth and trends within the inventory* 
This is the heart of the successful inventory and the conclusion 
of the third portion of our solution. 




MAINTAINING RECORDS 



Having covered the creation of new files, the servicing 
of requests and the maintaining of our inventory, let's go now 
to the maintaining of our records. We find that in the 
maintaining of our records we are going back to the same 
system that provided us with the ability to create these 
records . We have if you refer back to Figure I, the disk 
layout and Figure 2 the Disk Table of Contents provided for 
our user department a system that very closely parallels IBM's 
index sequential on the 360 . We have come up with an index 
sequential type sytem for a 1620 disk system. We have quite 
the same capabilities here - the system can create files, add 
to the files, delete from the files, process the file s 
randomly or sequentially. All of these abilities are itemized 
in Appendix D« 

The updating is done on a daily basis, in other words, the 
AV-LOD program which provides both the creation and updating 
ability is run daily just before the AV-DLY program which 
services the requests. Figure 11 shows the operation of AV-LOD 
In the update mode, but it should be noted that in our system, 
creation Is a special case of updating. At this point we must 
look closer at the back-up system that we mentioned earlier* 




Figure 11 
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If we have to duplicate our files we have to go through three 
steps* Number one is to load th< monitor system on the disk, 
number two we have to load our basic files which amount to our 
customers two part file, billing and shipping, and our film 
records for each category. The third step is then to reload 
all the dates booked on the films we have just loaded. The 
loading of the customers and the films is done again by AV-LOD, 
but the loading of the dates booked for a. given film is done by 
a unique program named QIKLOD© This utilizes our activity cards 
which are kept, up to date on the basis of our billing, i.e. for 
any films that have been returned and are no longer out of the 
library the transaction or activity card is pulled from our card 
file and stored elsewhere • So when loading up the periods 
booked for a given film we have only current bookings. This 
particular program allows us to load somewhere in the neighbor- 
hood of 5,000 bookings in an hour. The daily booking program 
that provides us with the confirmations allows us to book 
something like a thousand in an hour. We usually spend anywhere 
from 3 or h minutes to 15' minutes on the 1620. Obviously in 
time periods this small the most significant time factor is not 
computer time, but set-up time and general operator intervention. 

Having looked at the four parts of the problem and in turn 
the four parts of our solution, which involves creation of new 
files with program AV-LOD, servicing of requests using AV-DLY, 
maintaining of an inventory by producing a buyers indictor for 
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management and maintaining our records through the use of 
QIKLOD and AV-LOD and having balked a little about the pleasantly 
surprising performance we have gotten from the system, lets 
look at future projections for the system and areas of growth. 
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FUTURE PROJECTIONS 



Referring to Northern ! s enrollment growth curve in the 
Introduction to our discussion, we can see the installation 
of our Model i|0 36O in August of 1967 . With the installation 
of the machine under our belt, we are well on our way to 
converting System/2U0 to 36O COBOL. As we mentioned earlier, 
a large part of the development of System/2ii0 was devoted 
to producing our own Index Sequential system for the 1620. 
This having been done for us on the 360, the strict conversion 
is going rather quickly. Of course in a 36O we have additional 
hardware capabilities not found in the 1620. Two of these 
are the teleprocessing and multiprocessing capacities • 

Using teleprocessing we can do several things, two of 
which are; (l) give "immediate 11 response on film request and 
(2) develop a cirriculum-building-tool in the University. In 
the first case, not only can an immediate "yes" or n no fl response 
be given on a request, but if the response is "no" a calander 
showing remaining available dates can be displayed on the CRT. 
In the second case we can expand upon our existing quick index 
and on request, display available material pertinent to the 
subject matter to be covered plus indicating proper sequences* 
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The multiprocessing capability gives us the technology 
to be able to tie all the state libraries together so that a 
request given to any of the libraries would exhaust the states 
potential, i.e. over the phone, in a matter of seconds any 
individual could have the entire states film resources at his 
command* 

We have now a data retrieval system that is updated daily* 
With the new hardware to fill the gap we will have a real- 
time system. 

We feel at this point that the ability of the system to 
grow with increasing demands and greater the capabilities of 
the hardware is limited only by the extent to which we wish 
to pursue it* 
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APPENDIX B 



REQUEST 
NUMBER 



FILM 
NUMBER 



CUSTOMER 
NUMBER 



NORTHERN ILLINOIS UNIVERSITY CONFIRMATION COPY 



EDUCATIONAL FILM LIBRARY 
DE KALB, ILLINOIS 60115 



SHIPPING 
DATE 



SHOW 
DATE 



FILM 
TITLE 



CUSTOMER 
ORDER NO. 



IMPORTANT 

DUE BACK 
DATE 

•••••••••••••••< 

** RENTAL AND •••••••••••••••< 

SERVICE CHARGE $#••••••••••••••< 



BILL 

TO 



SHIP 
TO 



1 PLEASE NOTE ABOVE FILM IS A SUBSTITUTE BECAUSE FILM ORDERED IS NOT AVAILABLE. ** 15£ INSURANCE CHARGE ADDED FOR EACH FILM. 



NORTHERN ILLINOIS UNIVERSITY 



EDUCATIONAL FILM LIBRARY 
DE KALB, ILLINOIS 60115 



REQUEST 
NUMBER 



FILM 
NUMBER 



SHIPPING 
DATE 



show 

DATE 



IMPORTANT 

DUE BACK 
DATE 



FILM 
TITLE 



CUSTOMER 
NUMBER 



CUSTOMER 
ORDER NO. 



FROM: 

NORTHE 



AUDIO VISUAL CENTER 

RN ILLINOIS UNIVERSITY 

DE KALB. ILLINOIS 60115 



BILL 
TO 



TO: 



PACKING SLIP - NOT AN INVOICE 



RETURN REQUESTED LIBRARY MATERIALS 
16 MM MOTION PICTURE • NON FLAMMABLE 
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APPENDIX C 



NORTHERN ILLINOIS UNIVERSITY 

EDUCATIONAL FILM LIBRARY 
DEPARTMENT OF INSTRUCTIONAL MATERIALS 

DE KALB, ILLINOIS 60115 



r 



CUSTOMER NO. 



INVOICE NO. 



INVOICE DATE PAGE NO 



J 



** 15<Z INSURANCE 
CHARGE HAS 
BEEN ADDED FOR 
EACH FILM. 



REQUEST 
NUMBER 



SHOW DATE 



FILM NUMBER 



FILM TITLE 



CUSTOMER 
ORDER NUMBER 



** RENTAL AND 
SERVICE CHARGE 



c 



PAY LAST AMOUNT IN THIS COLUMN 



INSTRUCTIONAL MATERIAL 
TRUST NO. 52428 



SIGNATURE OF INDIVIDUAL PREPARING I NVOICE/ STATEM ENT 



MAKE CHECKS PAYABLE TO: NORTHERN ILLINOIS UNIVERSITY 

MAIL TO: NORTHERN ILLINOIS UNIVERSITY. BURSAR'S OFFICE, DE KALB, ILLINOIS 60115 
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APPENDIX D 



AV-LOD 
MANIPULATIONS 



• 




FILMS 


• 


ADDRESSING 


.TITLES. PRINTS 


• 


BILLING. SHIPPING. 


• • 




• 


* 


• • 


•LOADING . 


1 


1 


• 


1 • 1 • 


.AUGMENTING . 


2 


3 


• 


4 5 


.REPLACEMENT. 
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• 
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BASIC REQUIREMENTS 
AND 
END RESULTS 

1. INFORMATION LOADED AS IT 
APPEARS IN THE FILM AND CUSTOMER 
FILE. 



TYPEWRITER RESPONSE 

•GAP' CC NNNN FFFF 

LEAVING A GAP IN FILM NUMBERS 
C - CATAGORY 
N - NEXT OPEN NUMBER 
F - NEXT FILM NUMBER 

PLUS APPROPRIATE ERROR MESSAGES 
• ER • XX 

XX - IDENTIFICATION NUMBER OF 
ERROR 



2. OPERATION FILLS GAPS IN TITLE 
LIST OUTPUTFD ON TYPEWRITER FROM 
STEP ONE AS 'GAP' —INPUT FILM 
CARD WITH NUMBER OF PRINTS TO BE 
LOADED IN CC 9-10. 



3. OPERATION ADDS PRINTS. INPUT 
FILM CARD WITH 9-10 BLANK AND THE 
NUMBER OF PRINTS TO BE ADDED 
APPEARING IN CC 19-8". 



• AUGT ♦ NNNNNNNPP LL 
FILLING TITLE NUMBER GAPS 
N - FILM NUMBER TO BE INSERTED 
P - PRINT NUMBER FOR SAID FILM 
L - NUMBER OF PRINTS STORED TO 
DATE FOR SAID FILM 

•AUGP» NNNNNNNPP LL 
INSERTING PRINT 



4. REPLACING POSITIONS HELD BY 
DUMMY NUMBERS. AMOUNTS TO RE- 
PLACFMFNT (7) 



5. OPERATION ADDS SHIPPING 
ADDRESSES FOR BILLING ADDRESS- 
ALREADY HAVING ONE OR MORE SHIP- 
PING ADDRESS. 

6. OPERATION REPLACES FILM W/(0 
IN CC 80)t OR W/0 ( BLANK IN CC 80) 
CLEARING OF BOOKINGS ON ALL 
PRINTS. REPLACES WITH SAME 
NUMBER OF PRINTS. INPUT FILM 
CARD W/ CC 9-10 BLANK. 

7. OPERATION REPLACES AND 
INITIALIZES BILLING AND SHIP- 
PING ADDRESS INDICATED. 



•INSS« NNNNSS 

(SHIPPING ADDRESS) 
N - CUSTOMER NUMBER TO BE INSERTED 
S - CORRESPONDING SHIPPING NUMBER 

•FILM REPLACEMENT' NNNNNNN- 
N - FILM NUMBER WITH STORED 
BOOKINGS TO BE REPLACED 



•CUSTOMER REPLACEMENT • 
(BILLING ADDRESS) 
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DISK DATA STORAGE ROUTINE DDSR 



Mrs. Joyce Fodor 

Engineering Computing Laboratory 
B554 Engineering Building 
1415 W. Johnson Street 
Madison, Wisconsin 53706 



Description / Purpose 

DDSR is a program written in SPS II-D to facilitate permanent disk 
storage of users' data from FORTRAN or SPS programs. The blocks of data 
are given a name and table entries that are completely compatible with 
the MONITOR I system* The user need not know what sectors on the disk are 
available. 

Machine Configuration Required 

1. 1620 Model I or II 

2. 20 K memory 

3. Card I/O 

4* Indirect Addressing 
5. 1 Disk drive 

General Program Description 

Since rapid processing of the MONITOR system tables required approximately 
10000 core positions, and it was undesirable to take this much core from the 
user's program, the system uses the area from 02402 to 12000. In order to do 
this, the routine must first store the contents of these locations on disk so 
that it can restore them before returning to the main program. For this reason 
the short form of the subroutines cannot be used when using these subroutines. 
Both the disk write and the data recovery subroutines have routines which store 
these core locations in cylinder fifteen of the work cylinders before calling 
link to the main read and write routines. The read and write routines then 
search the tables to find the particular entry called or the required storage, 
and process the data. 

All data blocks are given both DIM entries and Equivalence table entries. 
When the routine is used to write data on disk permanently, the routine also 
makes an entry in the sequential table. 

Data blocks may be read from or written into disk in the normal course of 
any FORTRAN program, and may be used as often as the user desires, but the 
maximum amount of core that may be stored at one time is 20000 digits. This 
corresponds roughly to a singly dimensioned matrix of dimension 2000c If 
larger blocks of storage are required the arrays may be broken into parts and 
stored that way. 



This program might not work with the short form of the FORTRAN subroutine 
because core positions 2402 to 12000 are stored on disk and these core locations 
are used as work area. If the call to these subroutines, and INDATA or OUTDATA 
are located above this address the system should work. 



Warnings 




All entries in an array should be defined prior to storing them on 
disko If the array is doubly subscripted this is very important* If 
it is a singly subscripted array and all the elements from one to the 
desired element is defined this is adequate, 

FORTRAN CALLING PROCEDURES 

To Store Data 

CALL INDATA (IND, LF f LK, NR V ARRAY) 

IND m 1 if data to be stored is a single fixed point variable or a 
a fixed point array. 

3 if data to be stored is a single floating point variable or 
a floating point array. 

LF Is the floating point mantissa length for the program being used. 

LK Is the fixed point word length for the program being used. 

NR Is the number of elements to be stored, the dimension of the array 
if it is single subscripted, or M * N for a doubly subscripted 
array. 

A Is the name of the array or number, fixed or floating point to be 
stored. 

To Call a Data Block 

CALL OUTDAT (IND, LF, LK, NR, ARRAY) 

where parameters are the same as above. 
Naming the Data Block 

Whenever either of the routines is called, one data card will be read 
from the card reader. This card should have name of the block data to be 
read or written left justified in card columns 7 to 12. Care must be taken 
to be sure that this card appears in the proper location in the data deck 
or error will result and the job will be terminated. 

DISK DATA STORAGE ROUTINE DDSR (1620 - 01.1.036) can be ordered from 
the 1620 program library fhrough your local representative or: 



International Business Machines Corporation 
DP Program Information Department 
40 Saw Mill River Road 
Hawthorne, N. Y. 10532 




SESSION NUMBER T.1.2 



SPEAKERS 

G. ROEMER OF IBM SPOKE ON THE CSMP FOR THE 1130. THE TOPICS 
INCLUDED WERE THE DIFFERENCE BETWEEN DIGITAL AND ANALOG COMPUTERS, 
BLOCK PROGRAMMING AN ANALOG COMPUTER, USAGE OF THE CSMP PACKAGE, 
AND EXAMPLES. 

P. WOODROW SPOKE ON BUFFERED AND OVERLAPPED I/O. THIS PACKAGE 
WILL BE RELEASED TO COMMON SHORTLY. 
MEETING WAS CHAIRED BY LARRY WHELEN. 
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OVERLAPPED .I/O FOR 1130 FORTRAN PROGRAMS 



Peter J. Woodrow 

Aeronautical Research Associates of Princeton., Inc. 

Princeton., New Jersey 

For most types of commercial computer applications ^ computation 
is at a minimum and input/output operations are numerous. Thus it 
is desirous j even at the cost of increasing core requirements some- 
what; to use I/O routines that operate as efficiently timewise as 
is possible. Unfortunately ^ the 11 30 FORTRAN I/O routines were 
designed to require minimum core. As a result ^ all FORTRAN I/O 
routines (e.g. PRNTZ ^ CARDZ) use a common buffer that is filled 
by SFIO. While presumably,, -on output at leasts the I/O routines 
could return immediately with SFIO waiting for completion before 
starting a new line, this is not the case at present. All I/O 
routines wait internally for the completion of the requested 
operation. This means generally that I/O speeds from FORTRAN 
programs are almost halved. 

In order to speed up our commercial data processing,, we de- 
cided to write some FORTRAN-callable routines ^ primarily for use 
with COMET (since they all use A2 format in effect). /These routines 
were each written for a specific purpose but are presumably general 
enough for different applications. We have never tried using these 
routines with other FORTRAN I/0 3 . primarily because we did not wish 
to have SFIO loaded (approximately 800 words )^ but they should work 
above modification level No. 5- if the interrupt levels used by 
FORTRAN I/O are completely different from those used by these 
routines. In particular^ the card routine cannot be used by a 
FORTRAN program that does FORTRAN I/O on paper tape or the 
keyboard/printer . 



2. 



One point to note is that none of the routines is very complex 
since all usS standard assembler language I/O subroutines. There 
would almost certainly be no great difficulty encountered in writing 
a special version of PRNTZ to replace the supplied version and to 
run at a speed twice as fast as the current FORTRAN version. 
However , some core would have to be sacrificed. Replacing CARDZ 
with a faster version is somewhat more difficult for reasons ex- 
plained below in the brief write-ups that follow. 




SPCDR 



This routine has three entry points; SPCDR, SRERD, and 
SPCDP. The primary reason for writing this routine was not so 
much to increase card reading speed as it was to perform some 
special error checking and code conversion. If it is necessary 
for computation to be done by the FORTRAN program in order to 
determine whether to stacker select, this high card reading speed 
is impossible. In addition, in most commercial applications, 
each card is printed and hence(for the 1130) print speed is the 
overriding consideration. For our application it was highly un- 
desirable for the program to accept characters that would not 
print on the 1132 printer (as does the FORTRAN card read routine) . 
In addition, since we have an 029 keypunch with the left-zero- 
insertion feature, we felt it would be mandatory to accept -0 
(11-0 punch) which CARDZ translates into a blank. Following are 
the various calls that one might use. 

CALL SPCDR(NC, IFV, 1FTV, IAREA, NERRC) 

where 

NC - must contain the number of columns that are to be 

read 

IFV" - a vector containing field end points. The routine 
performs minor checking for specified fields on 
the card. If, for example, the fields were 1-9, 

10-19, etc., then IEV(l) = 9, IFV(2) = 19, 

etc . 

N.B. The last IFV element must be greater than or 
equal to NC . 

IFTV - a vector containing on return to the calling program 
the type of field corresponding to IFV. The 
following codes are possible 

1 = field contains only blanks 

2 = field contains only numeric information 

(no blanks) 
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5 = field contains blanks and numeric information 

4 = field contains only alphanumeric characters 

5 = field contains blanks and alphanumeric 

characters 

6 = field contains alphanumeric and numeric ^ but 

no blanks 

7 = field contains a mixture of all three; alpha- 

numeric ^ numeric j and blanks 
N.B. A (11-numeric) punch in the last column of 



a field is considered numeric (i.e. indicates 
the field is to be considered negative) . 

IAREA - a one-word integer vector dimensioned to contain 
the input characters* IAREA must be dimensioned 
at least NC/2 words (NC even) or (NC + l)/2 words 
(NC odd) . The characters are packed two per word 
as in the conventional A2 format, 

NERRC - returned as a zero if no errors were sensed; re- 
turned as a 1 if any character read is not 
printable on the 1132 printer (the only exception 
being -0(11 - punch)). Characters in error 
are replaced by blanks. 

The above routine converts characters and checks field types as 
the card is being read. After the card has been read,, the routine 
checks the error indicator provided by CARD1 (indicating a 1442 
sensed error) and retries the read and conversion if there was an 



In order to more fully understand the operation of the following 
two calls j one must be aware of the fact that SPCDR contains an 
internal buffer into which the card image is read. This is not 
destroyed by conversion and is thus available for the following 
two calls . 



error . 




CALL SRERD(NCj IW, IFTV, IABEA 3 NERRC) 

This call is provided so that one may reread the same card with 
different specified fields and thus first sense the type of card 
to be processed and then actually check the appropriate fields. 
No card reading takes place on this CALL. The explanation of the 
parameters is the same as that for SPCDR above. 

CALL SPCDP(NC, OAREA, NERRC) 

where 

NC - contains the number of columns to be punched 

OAREA - is a vector containing the characters to be 

punched (see IAREA above) 
NERRC - returns the error code 

= no error 

1 = at least one character to be punched not 

printable on 1132 printer (except -0) 

2 = an already punched column (read on call to 

SPCDR) is to be punched with a different,, 
non-blank character; i . e . ^ overpunching is 
not allowed 

If an error is sensed,, the card will not be punched and an immediate 
return to the calling program is instead executed. 

Note that if SRERD is called after a call to SPCDP, it will in 
effect be reading the "union" of the original card that was read 
and the card to be punched,, i.e. the final version of the card 
as it would appear if it were read again after punching. 

Note also that for proper operation all cards must be read by 
SPCDR prior to being punched by SPCDP; otherwise^ spurious errors 
are likely to be generated. 
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None of the above 'routines is particularly speedy. Their main 
advantage is the thorough error checking that is done by them 
rather than by the FORTRAN program. If maximum speed is desired 
with no automatic error checking,, then SFCDR which follows should 
be used instead. 
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SFCDR 

This routine has four entry points; SFCDR,, SFCDS^ SFCDF, 
and SFCDP. It was designed for a quite different environment. 
Here we wished to read a considerable number of cards 9 operate 
rather extensively on each card and maintain the results in core. 
As a result j speed was the primary objective with no desire to 
stacker select the cards. As a result .> the routine was designed 
with two buffers that alternate. Thus SFCDR immediately starts 
reading the next card (unless otherwise instructed) and then 
proceeds to convert the present,, desired card. As a result of 
this process conversion n on the fly" is not necessary and CARD0 
is used. However ^ the SPEED conversion routine is used and thus 
all EBCDIC characters are converted properly and at maximum 
speed. The FORTRAN CALL r s are as follows: 

CALL SFCDR(NW, IAREA, NC) 

where 

NW - is the number of words in IAREA to be filled 
(i.e. 1/2 the number of characters). The 
number of characters must thus be even. 

IAREA - a one-word integer vector that is to contain 
the converted card characters packed two per 
word as In conventional A2 format. IAREA must 
be dimensioned at least NW words long. 

NC - a code used to control the reading of the next 

card while this one is being processed. If NC 
is odd., no new card read is started (see SFCDS 
below) . If NC is even, then the next card read 
is started unless the first column of the present 
card happens to contain the card image code 
equivalent of NC. Thus, if the last card of 
one ! s deck always had a 7 - 9 punch in column 
one j then presumably one would not want to 
start reading any card following a card with a 
7-9 punch in column 1. The Subroutine Manual 
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gives the Hex IBM Card Code equivalent of a 7 ~ 9 
punch as 0050 which translates to a decimal 
integer of 80. Hence > NC should equal 80 for this 
example. If you wish to start reading the next 
card in all circumstances , then NC should be set 
to 2. 

CALL SPCDS 

This call is to allow the user T s FORTRAN program to make a more 
extensive test before starting a read operation on the next card. 
Presumably ^ NC would be set to 1 in the call to SFCDR ^ a test 
quickly made on the card^ and then a call to SFCDS if the next 
card is to be read. Note that SFCDS just starts a read operation; 
it performs no actual reading and^ in fact 3 has no effect if the 
next card is already in the process of being read. 

CALL SFCDF 

This call causes a wait until current card operations are complete 
and then initiates a card feed (with no read taking place at all) 
on the next card. Note that if a card read operation were under 
way at the time., then the next call to SFCDR will convert that 
card and not the one after the card being fed through. 

CALL SFCDP(NW, OAREA) 

where 

NW - contains the number of words to be punched (see 
SFCDR) 

OAREA - contains the characters to be punched (see IAREA 
above) 

If a card read was under way at the time of this call^ then the 
read is completed^ the punch data moved into the second buffer ^ 
and the punch operation initiated, A call to SFCDR at this time 
will cause proper conversion of the card that was read (and 
which has already been punched by the call to SFCDP) . If y however 5 



9. 



another call to SFCDP occurs prior to the call to SFCDR^ then 
the call to SFCDR will cause conversion of the data that was 
punched into the second card via the second call to SFCDP, 

Note that this routine always keeps track of whether the next 
card read has been started or not; hence,, it is unnecessary to 
call SFCDS at any time unless the obvious resultant speed increase 
is desired. 
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SPENT 

This routine contains three entry points; SPRNT^ SPRPT^ and 
SPRPC and is used to obtain high speed line-printer operation 
from a FORTRAN program. Double buffering is not used because it 
would result in only a very slight increase in speed at a cost 
of an additional 60 words of storage. The calls are as follows: 

CALL SPRNT(N¥, OAREA) 

where 

NW - contains the number of words to be printed 

(the number of -characters must be even and is 
2 * NW) 

OAREA - is a one-word integer vector containing the 

characters to be printed^ packed two characters 
per word as in the conventional A2 format 

The print operation is started on this call and a wait for com- 
pletion occurs either on the next call or on a call to either of 
the following routines . 

CALL SPRPT(NC) 

where 

NC - is returned as a 1 if a page eject occurred 

after the last line was printed and is returned 
as a otherwise. 

Use of this routine will cause a definite degradation in the 
printer speed. Generally ^ maximum speed will be obtained if an 
internal line counter is used to control page overflow. At any 
rate., the call to SPRPT should be made immediately prior to the 
printing of the next line (via a call to SPRNT) . Note that the 
page eject to the top of the next page (channel 1 punbh in 
carriage control tape) has already occurred automatically if NC 
is returned as one . 
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CALL SPRPC(NC) 
where 

NC - contains a code for printer forms control, NC 

is multiplied by 16 and transferred as is to 
PRNT1 (see Subroutine Library Manual) for printer 
control • Thus NC = 16 will cause an immediate 
skip to channel 1 and NC = 208 will cause an 
immediate space of 1 

Note that the forms control command is merely initiated by this 
call; it is completed on another call to any of the above entry 
points . 
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PINAL NOTES 



1) All of the above sets of routines operate independently of 
one another (except that SFCDR or SPCDR may be used^ but not 
both by the same program) . In general^ their operations overlap 
one another with no problems and they have been used in a number 
of applications with no difficulty. 

2) All sets of routines contain internal buffers into which the 
characters are moved prior to a call to the proper I/O routine. 
Hence the various character vectors may be operated on or changed 
immediately after a call even though the operation may only have 
been initiated, 

3) Since two of the sets of routines may have I/O operations 
under way concurrent with computation^ PAUSE may not work 
(Modification Level 5 should work^ I hope). It it does not^ then 
use of IOND (in CSP Version 2) is suggested. 

h) I will be happy to send out binary decks , but may not get 
around to submitting programs to COMMON for some time. I personally 
do not feel that there is anything unusual or complicated about 
these routines and make no comparisons with IDEAL or CSP,, Version 
2. They were written for our purposes and as a result have 
features peculiar to our needs. It may easily be that these 
features are wasted in your application. 
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// ASM 
•LIST 

*PR INT 

OOOB 
OOOO 
008B 

0000 1 

000 1 

0002 

0003 01 

0005 

0006 00 
0008 01 
OOOA 
OOOB 1 
OOOC 
OOOD 
OOOE 01 
0010 00 
0012 01 

0014 20 

0015 

0016 1 

0017 1 

0018 

0019 
001A 
001B 
001C 
001D 
001E 
001 F 

0020 
00? 1 

0022 

0023 

0024 01 
02 6 
0027 
02 8 
002 9 
02 A 
002B 01 
002D 01 
002F 01 

0031 

0032 

0033 

0034 01 
0036 01 

0038 

0039 
003A 
003B 01 
003D 
003E 01 

0040 01 

0042 

0043 01 

0045 

0046 01 



SYMBOL TABLE 

225C3119 ENT 

22645644 ENT 

225C3117 ENT 

0001 SRERD DC 

6973 STX 

6A74 STX 

65800000 LDX 

6905 STX 

C5800000 LD 

D40000DF STO 

700D MDX 
OOOC SPCDR DC 

6968 STX 

6A69 STX 

6580000B LDX 

C5800000 LD 

040 00OOF STO 

03059131 LIBF 

100 DC 

OODF DC 

OODA DC 
C061 RETRY LD 

D061 STO 

C101 LD 

D03E STO 

D027 STO 

C102 LD 

D042 STO 

C103 LD 

D05B STO 

C104 LD 

D05A STO 

C056 LD 

D480007D STO 

CO 5 7 LD 

D057 STO 

6100 LDX 

C050 LD 

D055 STO 
6680007F LOOPA LDX 

C60000DF LD 

4C04002D BSC 

D04F STO 

62CE LDX 
C04D LOOPB LD 

F6000162 EOR 

4C18003E BSC 

7201 MDX 

70F9 MDX 

C043 LD 

D480007D STO 

62CE LDX 
C6000194 MATCH LD 

4C100048 BSC 

C03C LD 
95000045 IFADX S 

E03C AND 

EE000194 OR 



SPCDR 
SRERD 
SPCDP 
* 

1 EXIT+1 

2 EXIT+3 
II SRERD 

1. SPCDR 
II 

L I AREA 
RETRY 

1 EXIT+1 

2 EXIT+3 
II SPCDR 

11 

L I AREA 

CARD1 

/1000 

I AREA 

ERROR 

ZERO 

ERR ID 
1 1 

IFAD+1 

IFADX+1 
1 2 

OFAD+1 
1 3 

I ARAD 
1 4 

EROAD 

ZERO 
I EROAD 

ONE 

CCNT 

1 
ZERO 
CHTYP 

12 CCNT 
L2 I AREA 

L L00PA+2»E 
CHAR 

2 -50 
CHAR 

L2 CHARL+50 
L MATCH »+- 
2 1 

LOOPB 

ONE 
I EROAD 

2 -50 
L2 EBCCL+50 
L NOTS*- 

CCNT 
LI * 

MSKAB 
L2 EBCCL+50 



SPECIAL CARD INPUT SUBR 



REREAD CARD WITH NEW 
FIELDS 



CALL SPCDR ( NC * I F V * IFTV» 
I AREA »NERRC ) 



o 
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PAGE I 



0048 





E837 


NOTS 


OR 




CHTYP 


0049 





DO 3 6 




STO 




CHTYP 


004A 





C034 




LD 




CCNT 


004B 


01 


4C040085 




BSC 


L 


SLCH*E 


004D 


01 


C6000194 




LD 


L2 


EBCCL+50 


004F 





E033 




AND 




MSKCH 


0050 


01 


EC80007C 




OR 


I 


IARAD 


0052 


01 


D480007C 




STO 


I 


IARAD 


0054 


01 


74FF007C 




MDX 


L 


I ARAD »-l 


0056 


01 


7401007F 


CKEF 


MDX 


L 


CCNT ♦ 1 


0058 





C026 




LD 




CCNT 


0059 


01 


9500005B 


I FAD 


S 


LI 


# 


005B 


01 


4C080066 




BSC 


L 


CKEC » + 


005D 





C022 




LD 




CHTYP 


005E 





180C 




SRA 




12 


005F 





E024 




AND 




MSKCT 


0060 


01 


D5000062 


OFAD 


STO 


LI 


* 


0062 





C017 




LD 




ZERO 


0063 





D01C 




STO 




CHTYP 


0064 





71FF 




MDX 


1 


-1 


0065 





1000 




SLA 







0066 





CO 18 


CKEC 


LD 




CCNT 


0067 





9077 




S 




I AREA 


0068 


01 


4C08002B 




BSC 


L 


LOOPA»+ 


006A 


20 


03059131 


TSTLC 


LIBF 




CARD1 


006B 





0000 




DC 




'0000 


006C 





70FD 




MDX 




TSTLC 


006D 





COOD 




LD 




ERR I D 


006E 


01 


6580000B 




LDX 


I 1 


SPCDR 


0070 


01 


4C200018 




BSC 


L 


RETRYjZ 


0072 





7105 




MDX 


1 


b 


0073 





6905 




STX 


1 


EXIT+5 


0074 


01 


65000076 


EXIT 


LDX 


LI 




0076 


01 


66000078 




LDX 


L2 


* 


0078 


01 


4C00007A 




BSC 


L 


# 


007A 





0000 


ZERO 


DC 







007B 




0001 


ERR I D 


BSS 




1 


007C 




0001 


IARAD 


BSS 




1 


007D 




0001 


EROAD 


BSS 




1 


007E 





0001 


ONE 


DC 




1 


007F 




0001 


CCNT 


BSS 




1 


0080 




0001 


CHTYP 


BSS 




1 


0081 




0001 


CHAR 


BSS 




1 


0082 





4000 


MSKAB 


DC 




/4000 


0083 





OOFF 


MSKCH 


DC 




/OOFF 


0084 





0007 


MSKCT 


DC 




/0007 


0085 


01 


C6000194 


SLCH 


LD 


L2 


EBCCL+50 


0087 





1008 




SLA 




8 


0088 


01 


D480007C 




STO 


I 


IARAD 


008A 





70CB 




MDX 




CKEF 


008B 





0000 


SPCDP 


DC 






008C 





69E8 




STX 


1 


EXIT+1 


008D 





6AE9 




STX 


2 


EX I 1+3 


0O8E 


01 


6580008B 




LDX 


11 


SPCDP 


0090 


00 


C5800000 




LD 


11 





0092 





D04C 




STO 




I AREA 


0093 





C101 




LD 


1 


1 


0094 





D0E7 




STO 




IARAD 


0095 





C0E8 




LD 




ONE 


0096 





DOES 




STO 




CCNT 



CALL SPCDP(NC.OAREA»NERRC) 
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o 9 7 





C0E7 


PLP 


LD 




CCNT 


9 8 


1 


4C0 40 06 




BSC 


L 


SRCH, E 


O09A 


1 


C480 007C 




LD 


I 


I ARAD 


009C 


01 


74FF007C 




MDX 


L 


I ARADt-1 


9 E 


o 


E0E4 


PLPR 


AMD 




MSKCH 


009F 





D0E1 




STO 




CHAR 


A 





62 CE 




LDX 


2 


-50 


( j A 1 


1 


C60 00194 


PLPA 


LD 


L2 


EBCCL+50 


A. 3 


o 


EODF 




AND 




MSKCH 


0A4 





FODC 




EOR 




CHAR 


n 0A5 


01 


4C1800AR 




BSC 


L 


PMATf+- 


O0A7 





7201 




MDX 


2 


1 


A 8 





70F8 




MDX 




PLPA 


0OA9 





CO 04 




L D 




ONE 


n OA A 





7 OOF 




MDX 




EXIT P 


A R 


01 


C6000162 


PMAT 


LD 


L2 


CHARL+50 


GAD 





D0D3 




STO 




CHAR 


OOAE 


01 


6680007F 




LDX 


12 


CCNT 


r ) Q 


01 


4C1800B cr 




RSC 


L 


PSTO,+- 


Qqp 


1 


C 6 F 




LD 


L2 


I AREA 


R 4 


01 


4CI 800BF 




BSC 


L 


PSTC+- 


OR 6 





FOCA 




EOR 




CHAR 


OCR 7 


01 


4C1800BF 




BSC 


L 


PSTOt+- 


R 9 





COIR 




LD 




TWO 


OORA 


oo 


05 8 0000 2 


EX 1 TP 


STO 


I 1 


2 


R C 





710 3 




MDX 


1 


3 


n o q. r> 





698^ 




STX 


]_ 


EXI T + b 


OQ&E 





70B5 




MDX 




EXIT 


OO n F 





C0C1 


PSTO 


LD 




CHAR 


OOCO 


01 


D6 000DF 




STO 


L2 


I AREA 


OOC 2 


01 


7401007F 




MDX 


L 


CCNT* 1 


0C4 


o 


COB A 




LD 




CCNT 


o or 5 





9019 




S 




I AREA 


OOC 6 


01 


4C080097 




BSC 


L 


PLPt + 


00C8 


2 


03059131 




LIBF 




CARD1 


OOC 9 





2 00 




DC 




/2000 


OOC A 


1 


OODF 




DC 




I AREA 


o c Q 


1 


OODA 




DC 




ERROR 


o c c 





COAO 


PREI D 


LD 




ZERO 


oco 


.0 


AD 




STO 




ERRID 


OOCE 


20 


03059131 


TSTPF 


LIBF 




CARD1 


OOCF 





0000 




DC 




/OOOO 


oono 





70FO 




MDX 




TSTPF 


OODl 





C0A9 




LD 




ERRID 


non? 


01 


4C2 00CC 




BSC 


L 


PRE IDt Z 


0004 





70E5 




MDX 




EXI TP 


ODD 5 





0002 


TWO 


DC 




2 


00D6 


01 


C480007C 


SRCH 


LD 


I 


I ARAD 


0008 





1808 




SRA 




8 


009 





70C4 




MDX 




PLPR 


OOfTA 


1 


OODR 


ERROR 


DC 




# 


OODB 





C0A2 




LD 




ONE 


OODC 





D09E 




STO 




ERRID 


OODD 


01 


4C8000DA 




BSC 


I 


ERROR 


OODF 




0051 


I AREA 


BSS 




81 


0130 





0000 


CHARL 


DC 




/OOOO 


0131 





8420 




DC 




/8420 


0132 





8120 




DC 




/8120 


0133 





80A0 




DC 




/80A0 


0134 





8000 




DC 




/8000 



0030 
0040 
0050 
0060 
0070 
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A 1 O t 

013d 





4420 


DC 


/4420 




ooso 


013 6 





42 2 


DC 


/4220 


# 


0090 


A 1 Q 7 

013 f 





412 


DC 


/4120 


) 


0100 


0138 





4000 


DC 


/4000 




oiio 


0139 





3 000 


DC 


/3000 


/ 


0120 


1 3 A 





2420 


DC 


/2420 


♦ 


0130 


1 3 ci 





012 


DC 


/0120 


i 


0140 


1 3C 





A 


DC 


/00A0 


= 


0150 


1 3 D 





9 


DC 


/ 9000 


A 


0160 


1 3 fc 





O O i'\ f^i 

8800 


DC 


/8800 


B 


0170 


1 3 F 





8400 


DC 


/8400 


C 


01 80 


0140 





O "4 f\ f\ 

8200 


DC 


/8200 


D 


0190 


14 1 





a 1 


DC 


/8 100 


E 


0200 


0142 





80 8 


DC 


/ 8080 


F 


02 10 


014 3 





8 4 


DC 


/8040 


G 


0220 


0144 





8 020 


DC 


/8020 


H 


0230 


1.45 





8010 


DC 


/ 8-0 10 


I 


0240 


014 6 





b 


DC 


/6000 


( -ZERO ) 


0250 


A 1 / 7 





5 00 


DC 


/ 5000 


J 


0260 


1 4 R 





4 8 


DC 


/4800 


K 


0270 


1 4 v 





4 4 


DC 


/4400 


L 


0280 


1 4A 





42 00 


DC 


/4200 


M 


0290 


1 4 R 





410 


DC 


/4100 


N 


0300 


: ' 1 4 C. 





4 U o 


DC 


/4080 





03 10 







4 4 


DC 


/ 4040 


P 


0320 


141: 





4 u 2 


DC 


/ 4020 





3 30 


a 1 /, r 

1 4 h 





AMI 

4 (...) 1 - > 


DC 


/ 40 10 


R 


340 


oib 





2 8 


D C 


/ 2800 


S 


03 50 


0151 





2400 


DC 


/2400 


T 


0360 


015 2 





2 2 00 


DC 


/2200 


U 


0370 


015 3 





210 


DC 


/ 2 100 


V 


0380 


0154 





2 8 


DC 


/2080 


w 


0390 


015 5 





2 04 


DC 


/ 2 040 


X 


0400 


15 6 





2 2 


DC 


/2 020 


Y 


0410 


015 7 





2 1 


DC 


/20 10 


Z 


0420 


15 H 





2 


DC 


/2000 





0430 


1 5 9 


u 


1 


DC 


/ 1000 


1 


0440 


1 5 A 





8 


DC 


/0800 


2 


0450 


1 5 B 





4 


DC 


/O4O0 


3 


0460 


1 5 C 





0200 


DC 


/0200 


4 


04 70 


1 5 





100 


DC 


/0100 


5 


0480 


1 5 E 





00 8 


DC 


/0080 


6 


0490 


1 5 F 





040 


DC 


/0040 


7 


0500 


1 6 





2 


DC 


/ 2 


8 


5 10 


161 





1 


DC 


/ 1 


9 


0520 


0162 





1040 


EBCCL DC 


/ 1040 




0530 


016 3 





404B 


DC 


/404B 


• 




0164 





404D 


DC 


/404D 


( 


U550 


016 5 





4 4 E 


DC 


/404E 


+ 


0560 


0166 





4 5 


DC 


/4050 


& 


0570 


16 7 





4 5 B 


DC 


/40 5B 


$ 


0580 


0168 





405C 


DC 


/405C 


# 


0590 


0169 





40 50 


DC 


/405D 


) 


0600 


1 6 A 





A 060 


DC 


/ A060 




0610 


1 6B 





4 06 1 


DC 


/4061 


/ 


0620 


n 1 6C 





/ A / n 

4 6 B. 


DC 


/406B 


> 


6 3U 


1 6 n 





40 n 


DC 


/407D 


t 


0640 


016E 





407E 


DC 


/40 7E 




0650 


1 6 F 





40C1 


DC 


/40C1 


A C?Cf 

B / 1 


0660 


0170 





40C2 


DC 


/4QC2 


0670 
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017 1 





40C3 


DC 


/40C3 


C 


068u 


f\ T "7 *"> 





40C4 


DC 


/ 40 C 4 


D 


0690 


n 1 70 

1 f 3 





4 C D 


DC 


/ 4 C 5 


E 


7 Jo 


174 





40C6 


DC 


/ 40C6 


F 


u 7 10 


a 1 -7 r 





A A / 7 

4UC7 


DC 


/ 4 C 7 


G 


7 <i 


0176 





40C8 


DC 


/ 4 C 8 


H 


7 3u 


O 1 "7 "7 

*J iff 





40C 9 


DC 


/ 40C9 


I 


7 40 


/\ "1 "7 O 

017 8 





A D 


DC 


/ AO DO 


(•ZERO ) 


7^0 


0179 





A D 1 


DC 


/ A D 1 


J 


7 6 - 


1 7 A 





A0D2 


DC 


/ AO D2 


K 


U7 /O 


A 1 7 n 

J 7 R 





A D 3 


DC 


/AO D 3 


L 


0/80 


Pi 1 "7 f~ 





A O P\ A 

A J I .) 4 


DC 


/ A D 4 




7 9 ^ 


0170 





A D 5 


D C 


/ A D b 




d u ^ 


r\ i "7 c 

1 f F 





A D 6 


DC 


/ A D 6 





uri iu 


1 7 r 


C) 


A f'\ l"\ '7 

A D 7 


DC 


/ A D 7 


p 


b Z 


lot) 





A D 8 


DC 


/ A D 8 




08 JO 


1 H 1 





A D 9 


DC 


/ A0D9 




0840 


v.' in/ 


(J 


/. n p 
4 U £1 c 


DC 


/ 4 E 2 


s 


t)U 


1 H 3 





4 U t. 3 


DC 


/ 4 E 3 


T 


sj b 60 


018 4 





4 E 4 


DC 


/ 40E4 


u 


OCi / J 


'J 1 !? 





4 E 5 


DC 


/ 40 L 5 


V 


b 8 


loo 





4 U t. 6 


DC 


/40E6 




u t>9 


1 p 7 





/ r\ c ~7 

4 h 7 


DC 


/ 4 E 7 


X 


0900 


U 1 " O 


•J 


Zj. O P ft 


V L 


/ 4 d 


T 


9 10 


r\ 1 


U 


/.nun 
4 U b 9 


DC 


/ 4 L 9 


z 


0920 


1 H A 





c F 


D C 


/ 2 F 





9 30 


1 8 H 


r\ 

u 


1 CT 1 


DC 


/ 2 F 1 


1 

X 


9 A 


1 8 C 





n A r t 

1 r 2 


DC 


/ 2 F' 2 


2 


9^0 


1 RD 





1 a r t 

2 Oh 3 


DC 


/ 2 F 3 


3 


9 6 


1 BE 





2 F4 


DC 


/ 20F4 


4 


09 70 


1 8 F 





2 F 5 


DC 


/ 2 F 5 


5 


9 8 


1 90 





2 OF 6 


DC 


/ 2 F 6 


A 


99 s-/ 


0191 





2 F 7 


DC 


/ 2 F 7 


7 


i 


0192 





20F8 


DC 


/20F8 


8 


1 io 


0193 





20F9 


DC 


/20F9 


9 


1 20 


0194 






END 
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SYMBOL TABLE 



CCNT 007F 
CKEF 0056 
EXIT 0074 
IFADX 0043 
MSKCH 0083 
PLP 0097 
PSTO OOBF 
SRCH 00D6 
ZERO 007A 



CHAR 0081 
EBCCL 0162 
EX1TP OOBA 
LOOPA 002B 
MSKCT 0084 
PLPA 00A1 
RETRY 0018 
SRERD 0000 



CHARL 0130 
EROAD 007D 
IARAD 007C 
LOOPB 0033 
NOTS 0048 
PLPR 009E 
SLCH 0085 
rSTLC 006A 



CHTYP 0080 
ERR IC 007B 
I AREA OODF 
MATCH 00.3 E 
OFAD 0060 
PMAT OOAB 
SPCDP 008B 
TSTPF OOCt 



CKEC 0066 
ERROR OODA 
IFAD 0059 
MSKAB 0082 
ONE 007E 
PRE I D OOCC 
SPCDR OOOB 
TWO OODi? 



NO ERRORS IN ABOVE ASSEMBLY. 



/OJ 



// ASM 

*LIST 

*PRINT 

000 
0057 
0093 
005D 

0000 1 

0001 

0002 01 
04 00 

0006 

0007 

0008 

0009 
000A 
OOOB 
OOOC 
OOOD 01 
OOOF 

0010 

0011 

0012 

0013 00 

0015 

0016 01 

0018 

0019 
001A 
001B 
001C 
001D 
001E 20 
001F 

0020 

0021 

0022 01 
0024 01 
0026 01 

0028 20 

0029 
002A 1. 
002B 1 
002C 1 
002D 01 
002F 01 

0031 

0032 01 
0034 01 

0036 

0037 01 

0039 01 
0038 
003C 
003D 
003E 
003F 1 

0040 

0041 

0042 

0043 
044 



SYMBOL TABLE 
22183119 
22183122 
22183106 
22183117 

0001 SFCDR 
6936 

65800000 

C5800000 

D034 

904E 

4830 

1010 

804B 

7103 

692D 

4C080037 
1001 
DO IB 
C1FE 
DO ID 

C580FFFF 
D026 

7401003E 

4026 

C023 

DOOF 

DOOF 

D011 

6100 

03059130 

00 
70FD 
C01A 

4C040028 
F480002A 
4420003F 

225C5144 CONV 
0000 

002B CFAD 
U02C 

002D CHCNT 
C5O0002F FAD 
D4000031 TAD 
7101 

74FF0030 
74FF003B 
7QF6 

65000039 RES I R 
4C00003B EXIT 

0001 WCNT 
0001 CODE 
0001 BUFA 
0000 CCNT 
0040 RCD 
C811 

18 DO 
D80F 
D007 
800F 



ENT SFCDR 

ENT SFCDS 

ENT SFCDF 

ENT SFCDP 

DC * 

STX 1 RESIR+1 

LDX II SFCDR 

LD II 

STO WCNT 

S K40 

BSC -Z 

SLA 16 

A K40 

MDX 13 

STX 1 EXIT+1 

BSC L RESIR»+ 

SLA 1 

STO CHCNT 

LD 1 -2 

STO TAD+1 

LD I 1 -1 

STO CODE 

MDX L CCNT»+1 

BSI RCD 

LD BUFA 

STO CFAD 

STO CFAD+1 

STO FAD+1 

LDX 1 

LIBF CARDO 

DC /OOOO 

MDX *-3 

LD CODE 

BSC L CONV»E 

EOR I CFAD 

BSI L RCD»Z 

LIBF SPEED 

DC /OOOO 

DC * 

DC * 

DC * 

LD LI * 

STO L * 

MDX 1 1 

MDX L TAD+1»-1 

MDX L WCNT.-l 

MDX FAD 

LDX LI * 

BSC L * 

BSS 1 

BSS 1 

BSS 1 

DC 

DC * 

LDD BUFAD 

RTE 16 

STD BUFAD 

STO RAD 

A ONE 



CALL SFCDR (NW» I AREA »NC) 
CALL SFCDS 
CALL SFCDF 

CALL SFCDP ( Nw ♦ I AREA ) 



c 



004^ 

VJ \J *T J 




H0F7 
u >j r f 




C TO 
O 1 vj 




DUr A 




n 


TOO F 

V- VJ VJ c 




1 n 




if ft n 
N u 


0047 

V/ VJ *T f 


1 


D4R0004R 
lj*tovjvjvj*td 




1 vJ 


T 
1 


RAH 
r\ ML/ 


0049 


& vj 


V .3 V J 7 i U 




1 T R F 




c a p n n 


004 A 
v/ vj ■+ a 


A 
vj 


JL vj u vJ 




U v* 




/ I AAA 


04R 


1 


004T 

VJ VJ *T \_ 


KMLJ 








04T 

vj VJ *+ V, 


VJ 1 


74FF00^F 




im U A 


t 

k> 


V. V, (N 1 f X 


O 04 F 


u 


i nnn 




MOD 






a 04 f 


A 1 

VJ 1 






□ cr 

DOV. 


T 
1 




O^ P 
U VJ P £ 




n o n o 

VJ VJ VJ VJ 


DUr ML? 


DCC 

DOO 


F 


U 


00^ 9 




OOvj ft 








Vw DUrA 


005 3 

\j \j 


1 

X 


OOFA 

vj vj i— ry 








C Ri tFR 
v»DUrD 


00R4 

v./ W J 


a 

VJ 


0001 

V w u i 


(OM F 


Ij v*. 




X 


00^ s 

VJ VJ J .J 


VJ 


ooso 

\J \J *J \J 


if ft n 


L/ v. 




r n 
u 


V./ W J u 


V/ 


00 ? ft 

VJ \J C Q 


If 40 


U v., 






00^7 

vj vj j t 


1 

X 


VJ VJ jj Q 


Or WLjo 


LJ V 






OOS ft 

VJ VJ J O 


A 

VJ 


V„ VJ C 




u (J 




r rw t 

VwLFM 1 


00S9 

VJ vj J s 


1 

VJ X 


44 1 OOO^F 
*r *r Ju Vy U v. J 3 r 






i 

u 


Dm * mm 


O^i R 

\J \J .J LJ 


1 

VJ 1 


4T ft 000 R7 

*r v^. o vj vj v.; f 






T 
1 


cprhc 
on Uj 


o o r n 


i 

1 


O R F 
VJ U ^/ c 


err p)D 








Vj 


A 

VJ 


6 Q ^ 1 
O V 5 1 




c T Y 


X 


DDPCTO.1 
rKtol + X 


R F 


O 1 

VJ JL 


6^ftonn^f^ 

O J O VJ vv u » u 




L U A 


1 X 




061 


VJ 


n o i 

v- X vj 1 




1 n 
u u 


1 
1 


X 


006? 

vj vv vj & 




no i r 




c; t n 




P F A Pi^. 1 
r* r A X 


006 ^ 

\J VJ VJ .J 


00 

VJ v.; 


r s r ooooo 




1 n 


T 1 
I X 


u 


06 s 

VJ w VJ .J 


VJ 


90F0 




c 





If 4A 
Ps *+ U 


1 . VJ t J VJ 


n 

VJ 


4 ft ^ 

HO JU 




DCf 




_ 7 


006 7 

V./ vJ O f 


VJ 


1010 

X VJ i, vj 




Q 1 A 




1 A 
X O 


0068 





8 0FD 




A 
r\ 




If 40 

rv H VJ 


06 9 

\J \J VJ s 


o 


n om 

\J vj \j x 




O 1 vj 




W f" M T 

W Vw IN 1 


06 A 


o 


710? 




! v i U A 


X 


C 


6 R 

U w Q n> 


n 

u 


6 Q ? 6 




C T Y 
O 1 A 


X 


D F V TTi.1 


o 06 r 

VJ VJ O V_ 


VJ i 


4 r f A * ft O O ft F 
*+ v u o u vj o r 




per 


1 

L 




OA F 

U \V O L 


n 
u 


X vJ vj x 




C 1 A 
O LA 




X 


06 F 

u vj o r 


a 

VJ 


n o i r 

U VJ X D 




i vj 






0070 


o 


6100 

VJ x vy VJ 




LUA 


X 


A 

u 


71 

VJ VJ f 1 


VJ 


r r fo 








pi ic ah 

DUr AU 


07? 


o 


1 ft 00 

X vj i J vj 




P T F 




1 A 
X D 


0073 


vj 


08 OF 

l J VJ (..J L- 




O 1 U 




Rl IF APi 
DUr MU 


0074 


o 


DO 1 9 




O t VJ 




PAH 


007 5 


o 


8 OOF 

\J \J VJ l*. 




A 




VJIN £1 


0076 

vj w f VJ 


VJ 


no l ^ 

L J VJ X D 




1 vJ 




pre An-t-T 


077 

VJ V/ f I 


VJ 


ft o r *a 

O VJ .5 




A 
A 




V\ L \\ \ 


A07 ft 

VJ VJ f o 




^01 o 

■ ^ VJ X vJ 




CTO 
O 1 U 




pre ah 

rlr A l J 


7 9 


n 

VJ 


00 6 

i. J VJ VJ KJ 




c to 

1 vj 




D T A h4- 1 
r | A \J-T X 


07 A 

V./ VJ r r> 




VJ 


C 1 

V- V/ X VJ 




L LJ 




rln Vw In 


7 R 

u vj f n 


O 1 

U I. 


I.J HOUU 1; tl 




1 vJ 


f 
1 


D A f > 

r ALJ 


070 

\J VJ I U 


1 

VJ X 


C 4 7 F 

V, t V> U U l; / r 


pf a n 


t n 


1 




n 7 F 


n i 

VJ I 


n s o n n n ft i 

t J J U V J u U O i, 


DTAPi 


O I vj 


L X 




U VJ O 1 


VJ 


7 10 1 
/ X u x 




iV Y 
Im Lj A 


X 


X 


ft ? 

VJ VJ O c» 


1 

VJ 1 


t *+ r r vj u f [t. 




m y 


1 

L 


r r A U*r X ♦ 


o n ft 4 

V ./ VJ O <+ 


A 1 
VJ i 






M P* Y 






n o p a 

U U o D 


a 

u 


7 n F A 




M PN Y 




D C A A 

r r A U 


00 A 7 

KJ VJ O f 


?0 

vJ 


JV, Jl^H 




1 T R F 




Or llU 


8 8 


o 


0001 




n r 

U v„ 




/ n n a i 
/ u u vj x 


00 ft 9 


1 

1 


ft A 


p r f a n 

rLr M LJ 


n r 

l J L 






ft A 

\J VJ O r\ 


1 

I 


ft R 

VJ VJ O D 




l J U 






008B 


1 


008C 


PCHCN 


DC 






008C 


20 


03059130 




LIBF 




CARDO 


008D 





2000 




DC 




/2000 
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GORE 1 
0O8F 01 
091 01 

0093 1 

0094 20 

0095 
009* 01 
0098 
OOEA 
013C 



008F 

65000091 
4C000093 
0094 

03059130 
3000 

4C800093 

0052 

0052 



PAD DC 
PRESI LDX 
PEXIT BSC 
SFCDF DC 

LIBF 

DC 

BSC 

CBUFA BSS 
CBUFB BSS 
END 



LI 
L 



* 
* 
* 
* 

C ARDO 

/3000 

SFCDF 

82 

82 



SYMBOL TABLE 



BU FA -0.0*0 
CFAD 00 2A 
FAD 002D 
PCFAD 0089 
PTAD 007F 
SFCDP 005D 



3UFAD 0052 
CHCNT 00 2 C 
K40 00 56 
PCHCN 008B 
RAD 004B 
SFCDR 0000 



CBUFA 0098 
CODE 003C 
K80 0055 
PEXIT 0091 
RCD 003F 
SFCDS 0057 



CBUFB OOEA 
CONV 0028 
ONE 0054 
PFAD 007D 
RES IR 0037 
TAD 002F 



CCNT 003E 
EXIT 0039 
PAD 008 E 
PRESI 008F 
SFCDF 0093 
WCNT 003B 



NO ERRORS IN ABOVE ASSEMBLY. 
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// ASM 
*LIST 

*PRINT 

0000 
0072 
Q080 
0000 



SYMBOL TABLE 



0028 
0029 



0032 
0033 
0034 
0035 
0072 





225D9563 




ENT 




SPRNT 




225D95E3 




ENT 




SPRPT 




225D95C3 




ENT 




SPRPC 


1 


0001 


SPRNT 


DC 




# 





6929 




STX 


1 


EXIT+1 





6A2A 




STX 


2 


EXIT+3 


01 


65800000 




LDX 


11 


SPRNT 





C101 




LD 


1 


1 





D018 




STO 




MFOA+1 


20 


176558F1 


TSTPL 


L IBF 




PRNT1 





0000 




DC 




/oooo 





70FD 




MDX 




TSTPL 


00 


C5800000 




LD 


11 








D028 




STO 




OAREA 





9023 




S 




CONST 


01 


4C080012 




BSC 


L 


* + 2* + 





C020 




LD 




CONST 





D023 




STO 




OAREA 





COIF 




LD 




OARAD 





8 021 




A 




OAREA 





801E 




A 




ONE 





DOOB 




STO 




MTOA+1 





6200 




LDX 


2 








7102 




MDX 


1 


2 





6916 




STX 


1 


EXIT+5 





C016 




LD 




ZERO 





DO 19 




STO 




EPGFL 





9019 




S 




OAREA 


00 


D4000001 




STO 


L 


/0001 


01 


C6000020 


MFOA 


LD 


L2 


* 


01 


D5000022 


MTOA 


STO 


LI 







72.FF 




MDX 


2 


-1 





1000 




SLA 










7101 




MDX 


1 


1 





70F8 




MDX 




MFOA 


20 


176558F1 




LIBF 




PRNT1 





2000 




DC 




/2000 


1 


0035 




DC 




OAREA 


1 


008F 




DC 




ERROR 


01 


6500002C 


EXIT 


LDX 


LI 


# 


01 


6600002E 




LDX 


L2 


* 


01 


4C000030 




BSC 


L 


# 





0000 


ZERO 


DC 










003C 


CONST 


DC 




60 


1 


0035 


OARAD 


DC 




OAREA 





0001 


ONE 


DC 




1 




0001 


EPGFL 


BSS 




1 




003D 


OAREA 


BSS 




61 


1 


0073 


SPRPT 


DC 




# 





69B7 




STX 


1 


EXIT+1 


01 


65800072 




LDX 


11 


SPRPT 


20 


176558F1 


TSTPF 


LIBF 




PRNT1 





0000 




DC 




/OOOO 





70FD 




MDX 




TSTPF 





COBA 




LD 




EPGFL 


00 


D5800000 




STO 


11 








7101 


SPREX 


MDX 


1 


1 





69B1 




STX 


1 


EXIT+5 





6AAE 




STX 


2 


EXIT+3 



SPECIAL FORTRAN PRINT SUBR 
FOR ACCOUNTING 



A, 



1 04 



PAGE 2 



Ou f r 


U 


7 A A A 
f U MM 




MDX 


EXIT 


0080 


1 


UUoi 


cpppr 




* 


0081 


U 


A Q A Q 
O7M7 




^TX 1 


EXIT+1 


0082 




^RQAAAflA 




LDX I 1 


SPRPC 


0084 


00 


CDoUOUUU 




1 FY I I 





OUoo 


V 






SLA 


4 


0087 





rAA t 




A Mh 


1 lwl> 


00 88 





0UU5 




A 


CCWD 


A n O Q 

Oo V 


U 


ri nn 1 

UUUl 




STO 


CCDWD 


OOo A 


c u 


1 7 A G» RP 1 
1 ( O D D or 1 




L I B F 


PRNT1 


a n o n 

008B 


1 


AAQr 

UUoL 


rrnwn 






008C 





7ACC 




MDX 


SPREX 


008D 





UrrU 




nr 

L/ V- 


/0FF0 


008E 







r r w n 

v. V- W !.v 


L/ V*. 


/ 3000 


UUor 


I 




ERROR 


DC 


* 


0090 





C0A2 




LD 


ONE 


0091 





D0A2 




STO 


EPGFL 


0092 


01 


4C80008F 




BSC I 


ERROR 


0094 








END 
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SYMBOL TABLE 



CCDWD 008B 
EXIT 002A 
OAREA 0035 
SPRPT 0072 



CCWD 008E 
MFOA 00 IE 
ONE 0033 
TSTPF 0076 



CONST 0031 
MSK 008D 
SPREX 007C 
TSTPL 0007 



EPGFL 0034 
MTOA 0020 
SPRNT 0000 
ZERO 0030 



ERROR 008F 
OARAD 0032 
SPRPC 0080 



NO ERRORS IN ABOVE ASSEMBLY. 
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SESSION NUMBER T.1.4. 
SPEAKERS 

J.L. TUNNEY, JR., CHAIRMAN S/360 HARDWARE COMMITTEE 
DISCUSSION 

THE MEETING CONSISTED OF A SOUND-OFF ON HARDWARE PROBLEMS, AN 
INFORMAL SURVEY OF MINIMUM CONFIGURATIONS THOUGHT TO BE REQUIRED 
FOR VARIOUS SOFTWARE PACKAGES, AND A SURVEY OF USERS OF 
NON-STANDARD EQUIPMENT. 
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REPORT ON MEETING OF SYSTEMS DIVISION, 360 PROJECT, 
HARDWARE COMMITTEE - 9/7/67 



Attendance: Approx. LOO 



Chairman : James L . Tunney 

J . R . Ahart , Inc . 
627 SaLem Avenue 
Dayton, Ohio 45406 
Telephone 513 - 278-4754 



The first meeting of this committee since its organization 
was divided into three sections : 

1. A discussion of users T hardware problems and how they 
have been remedied. 

2. A discussion of software systems and what minimum hard- 
ware requirements have proven to be in practice. 

3. A survey among those attending of new or unusual equipment 
that they might have on their TT 360 TT . 



SECTION I - HARDWARE PROBLEMS 



" 1442" Card Read-Punch 

The majority of the complaints about this unit involved an 
apparent lack of checking circuits . Reports included machines 
that would punch and read without cards, others instances where 
the program would proceed normally without the punches actually 
going down, and still other problems of punching without feeding 
the cards. One user having both a "1442" and a "2501" found that 
in order to "CATALR" from the "1442", both SYSIN and SYSRDR had 
to be assigned to the "1442". 

"1443" Printer 

Most problems with the "1443" were evidently blamed on static 
electricity by the FE T s. One suggestion was to install a humidi- 
fier, another was to hang tinsel on metal frame over which the paper 
moves, a third attendee mentioned that the box of paper must set 
on the steel frame. Richard Pratt said that their printer could 
throw the type-bar without leaving the ready state! 

"2501" Card Reader 

Four attendees reported that dust accumulated in one of the 
read stations and caused frequent read checks. It was felt that 
on heavily used equipment once-a-week PM was not sufficient to 
relieve the problem and a design change is needed. 
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"2540" Card Read-Punch 



Read-side: One person reported a machine that read 1200 
cards per minute instead of LOOO/minute when delivered. This 
caused excessive reader checks and proved difficult to find. 

Punch-side: Three installations reported excessive numbers 
of partly punched holes without , punch checks . New dies proved 
to be the only effective remedy. 

"1403" Printer 

One user reported that on the QN print chain which is the FL/I 
set with 45 preferred graphics, the single quote mark is a non- 
p referred character. The net result is that any line having an 
apostrophe prints at 330 lines/minute instead of 1100! Another 
reported an oil leak that took 3 days to fix. Moral-put a pan 
under it! Another installation reported that transfer of static 
electricity from a belt to a wire resulted in character substitu- 
tion. 

"2311" Disk Drive 

Six users reported oil leaks or hydraulic problems . Several 
more said they frequently couldn T t I.P.L. from certain drives. One 
said the fix was to power the "2311" down, slam the lid, and restart it! 
Of more serious concern was the report that I.B.M. is currently 
installing desensitizers on the heads of all "2311 T s". At least 
two people reported that they had problems reading old files after 
this engineering change. A theory was advanced that possibly old 
"2311 T s" were already below sensitivity specs! 

"029" Keypunch 

Duplicating ECBDIC cards with or without the printing mechanism 
engaged is reported to damage the code plates. I.B.M. offers a 
special "024" for this purpose but the users felt that the "026" 
should be modified to do the job since it is the "360" Keypunch! 



SECTION II - MINIMUM HARDWARE REQUIREMENTS 
FOR AVAILABLE SOFTWARE 



T.O. S . No comment other than no amount of core will speed it up! 
D.O .S . 32K and 2 Disks should be minimum. 
D.O.S. -FORTRAN IV 3 2K minimum. 
D.0.S.-R.P.G. 32K minimum. 
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D.O.S.- COBOL 32K marginal, 64K adequate. 
D.O.S.-PL/I same as FORTRAN - 32K minimum. 

D.O.S. -Bill of . Mat! . Proc. with COBOL 64K and several disks. 

M.I.T. Civil Eng. Pkg . 128K and 3 disks (comparable to what used 

to fit on 40 or 60K tT 1620 TT ! 

Proj. Mgmt . System Rumor suggests 4 disks or 4 tapes! 

D.O.S. Utilities and Sort-Merge Good even in 16K! 

SECTION III - NEW OR UNUSUAL EQUIPMENT 

Record Overflow on "2841" An excellent feature for $10/month that 
is rendered useless by lack of software support under D.O.S. 

Storage Protect Out of 12 reported installations, 3 said it took 
2 months or longer to get it to work! 

" 1012" Paper Tape Read-Punch R.P.Q. Leonard Sites, Sunstrand 
Aviation, Denver, Colorado . 

M 1231 TT Optical Read er Miami-Dade Junior College, Miami, Florida 
reported that this is a good unit but that it is only supported 
under B.P.S. Lack of D.O.S. support results in an unrecoverable 
unit check when D.O.S. is in core and someone readies the TT 1231 TT 
or other unsupported device! 

"565" CALCOMP Pl ot ter on "2701" Bethlehem Steel Company reports 
that it runs at %, "1620" speed under this hook-up.! 

"470" CALCOMP Plotter off-line, 9 channel mag tape. Don Mcllvain 
reports that 9 channel tape characters are very unusual and some 
extra BAL programming is required for this arrangement. 

"2314" Disk Unit Lear-Siegler Company, Grand Rapids, Michigan. 

I .B.M. Visual Display Terminal Also Lear-Siegler Company. 

Data Cell Data Corporation, Dayton, Ohio 

R.C.A. Video-data Terminal Also Data Corporation 
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Presentation Summary of a Member of a Panel 

on 

"Personnel Selection and Job Descriptions 
in Medium-to-Small Computer Installations 11 • 

By 

Paul A. Bickford 
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INTRODUCTION 



The comments below are centered around a small university (2,400 
students) Computer Center which has an IBM 1620 20k,, 1311 configuration 
for education, a compliment of unit record equipment and an IBM 1401 8k, 
3-1311 system for University Administration Data Processing. Some of 
the main tasks of the installation are: (1) Maintenance of a large 
Alumni file (2) Student Admission files (3) Registration (4) Grade pro- 
cessing and reporting (5) Maintenance of Student Information files and 
(6) Developments of Campaign Accounting files. The Administrative 
Data Processing group has always operated under a closed shop operation 
philosophy whereas the Education group has always operated under an open 
shop philosophy. All facilities are located in one building. The Staff 
consists of eight people, one Secretary, two Key Punch operators , one 
File Clerk, one Programmer, one Machine Room Supervisor, Part-time 
Delivery Boy and a Director. 

PERSONNEL SELECTION 

The procedures for hiring people are straight forward and derived 
primarily out of necessity because of a very limited reservoir of pro- 
spective experienced people. Attributes that the prospective em- 
ployee's must have is a pleasant personality and who is reasonably 
easy to get along with. This is mandatory because of the size of the 
installation. One is constantly rubbing elbows and communicating with 
another member of the staff and emotional friction here would be more 
detrimental in disrupting output than an ailing CPU. 
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EDUCATION 

A high school diploma is required. College experience is desired 
for the positions of: Programmer and Machine Room Supervisor. 

SEX 

Women are employed for the positions of File Clerk and Key Punch 
operators. Men are employed for the positions of Machine Room Super- 
visor, Programmer and Machine operators. 

AGE 

Women: 18 to 6 

Men: 18 to ? depends upon persons experience and our needs. 
Presently, the oldest man is 31 years. 

JOB DESCRIPTIONS 

Because the installation is small, there is an overlapping of 
job responsibilities. Each person must perform numerous and varied 
tasks in order that continunity may be given to the flow of work thru 
the Computer Center. Sickness and vacations sometime present serious 
difficulties because the overlapping of responsibilities never seems 
to be adequately or properly defined. The job titles are general ones 
and the "other" tasks each person performs will be described. 

KEY PUNCH OPERATOR (S) 

Each must know how to operate the 548 Interpreter, 083 Sorter, 
514 Reproducer, 085 Collator and the 407 Accounting Machine in addition 
to tne 026 Key Punch and 056 Verifier. They must eventually become 
familiar with (know by heart) the field formats of 20 plus different 
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cards. On some jobs, the Key Punch operator will receive information 
directly in the mail, key puncft and verify it, select the proper 
Interpreter board (and sometimes wire one) process the cards thru the 
54 8 and then file them in the proper file. Many times the operator 
must refer to a master code book in order that she may supply neede 
source information codes to punch into cards. Currently, one operator 
is learning to program the 14 01 in RPG language. 

FILE CLERK 

This individual primarily performs the task of hand filing update 
to the 75,000 card Alumni file which constantly changes. Presently, 
this procedure is followed even though the Alumni files reside on 1311 
disks,, and shortly this hand task will be eliminated. There are anothe 
15 files that constantly change and the file clerk spends most of her 
time performing this function. However, she must also be able to Key 
Punch and operate the other Unit Record equipment when either of the 
other two operators are ill or on vacation. 

SECRETARY 

Besides performing the routine tasks of a secretary ie, typing 
letters, distributing mail and filing etc. she must also be able to 
Key Punch and operate most of the Unit Record equipment. She also 
updates Alumni address changes in an Alumni Directory which is 3 feet 
thick. Code sheets that are sent to the Computer Center are supplied 
with additional codes (such as the student and alumni alphabetic 
identification numbers) by the Secretary. 
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MACHINE ROOM SUPERVISOR 

Much of the daily routine is closely watched and controlled by 
the Machine Room Supervisor, He operates , wires and programs all 
equipment. He accepts job requests (verbally or in writting) and 
schedules them in a manner that will keep all equipment as busy as 
possible* With the many tasks that must "mesh" perfectly before a 
job is completed he must be constantly aware of the state of comple- 
tion that each job is at so that work can progress along. This "art" 
of scheduling seems to work reasonably well in our small shop environ- 
ment. The peak work periods seem to always present serious scheduling 
problems and sometimes some jobs get completely neglected for awhile. 
The Machine Room Supervisor carries the heaviest responsibility load 
in seeing that jobs are finished in a reasonable length of time and 



well as all Administrative offices. One-fourth to one-half of his time, 
approximately, is spent in programming the less complex "One-shot" jobs 
that occur frequently. 

PROGRAMMER 

Is responsible for programming the more complex jobs such as 
Development Fund Accounting, general Alumni and Student file maintenance. 
He frequently takes requests directly, does what ever systems work is 
necessary, writes and key punches his own program as well as assemble 
and test the program. On half of the jobs he is the only person who 
knows precisely how his programs function. Having only one person res- 
ponsible for major jobs leaves a smal] installation in jeopardy. The 




are well done. He often communicates directly with the Faculty as 
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Programmer also writes the operating instructions for all of his 
programs and is supposed to flow chart them also. 

He is also responsible for knowing the more intimate details of 
the IBM Sort Package, the Disk Utility Programs and Disk File Organ- 
ization routines. 

DIRECTOR 

Last, but I hope not least, the Director has the ultimate res- 
ponsibility of the complete operation and he spends most of his time 
communicating with the various departments of the University and 
monitors the progress of new needed applications. Sometimes he plays 
the role of Programmer for a week or two, Machine Room Supervisor for 
awhile besides carrying on the usual routine of answering complaints 
(we have a few) and carrying on with correspondence. He also teaches 
a course in Basic Computer Programming. 
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PROGRAMMER SELECTION AT THE FEDERAL RESERVE BANK OF MINNEAPOLIS 

OUTLINE 

sic Structure 

Programming staff of our company can be broken down into 5 basic units • 

1. Programmer 

2. Procedures Analyst 

3. Systems Analyst B 

4. Systems Analyst 

5. Senior Systems Analyst 

Advancement along the scale follows naturally in that order, with the 
"programmer" being the basic unit, or starting point. 

Even from the beginning, a programmer must be trained as a high-powered 
individual in the many levels of work into which he may advance. His 
duties include: 

1. Present job analysis. 

a. Discuss job to be programmed with supervisor or department head 
in charge of the operation to be programmed. 

b. Study and learn the "ins and outs" of the job by working with 
the clerk; acquire a thorough understanding of all facets of the 
job, including special operating methods, periodic, regular and 
irregular error procedures. 

2. Program design. 

a. Determine program objectives through consultation with bank and 
systems personnel. 

b. Construct a flow chart of the work to be done by the computer. 

3. Program writing/resting. 

a. Writes the program - ideally in any one of several programming 
languages; selection of the one most suitable to the job. 

b. Designs test procedure and sees to the preparation by keypunched 
of a "test-data deck". 

c. Run, test, debug program. 

4. Installation/ Implementation. 

a. Assist in preparation of operator manuals. 

b. Performs any necessary training of departmental and data 
processing personnel concerned with the handling of the job. 

_ r ^---S. 

a. Normal procedure is to assign new programs to a "system" when 
hired . 

b. Most programmers will also be required, from time to time, to 
help in the planning and programming of any special one-time 
shots . 

ring Techniques 

We hire on three things: 1) Pat score, 2) willingness to work; and, 
3) ability to learn. 
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B. Requirements 

1. Education - High school diploma with good record^ indication of 
math interest. Any additional education, including college level 
statistics, economics, accounting, or even IBM courses in functional 
wiring or programming are considered; if absent, a willingness to 
take course work to fill in the gaps must be present. 

2. Previous experience. We promote from within and train ourselves. 
Experience required varies with the job, and may be as low as none 
for a programmer, to 5 years or more of bank experience for a 
Senior Systems Analyst. We subscribe to the basic belief that 
"Persons with an aptitude for this type of work (programming) can 
usually gain job knowledge rapidly, but without the aptitude, no 
amount of experience will produce a competent programmer. 

3. Communications - In all levels of work, a fair amount of communica- 
tion with other bank personnel will be required. The importance 

of finding people who are willing and able to communicate concretely 
and calmly with others cannot be over emphasized. In his limited 
supervisory level of work, the ability to communicate will be of 
great value. 
4. Personal characteristics. 

a. Programming at any level requires initiative and ingenuity. 
People must be found with the ability to absorb through obser- 
vation, to suggest and implement improvement. 

b. Programming is time consuming work, and requires a good amount 
of initiative to complete a project on schedule . 

c. Honesty important. As an employee moves into the level of 
systems analysis, his principal goal will be to devise improved 
methods, reduce costs and improve bank services. Among these 

as well will be the responsibility to provide safeguards against 
falsification and embezzlers, and against destruction - whether 
inadvertant or careless - of valuable records. 
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ORGANIZATION AND SELECTION 



Although in the final analysis organization is people oriented, in IBM 
we have a structure of jobs which seems to work very well in all of 
our programming areas whether the group is large or small. I will 
describe this structure to you in rather general terms without getting 
into a completely detailed description of the job responsibilities and 
requirements. As a matter of fact, this is an opportune time to talk 
about the subject because I have been involved during the past nine 
months in a study of the job descriptions that have existed for pro- 
grammers for the last five years. We are just about at the end of 
this now, and are making a number of revisions. In order to describe 
the key positions correctly we conducted extensive interviews of 
programmers throughout the company, and as a result the new 
descriptions give a pretty accurate description of the basic programming 
jobs being performed today. 

First of all (Figure 1) there are two ways to enter programming in IBM- 
with or without a college degree. Generally speaking the college graduate 
can have any degree although we prefer a technical degree. (A little 
later on I'll give you a breakdown of the educational background of our 
people. ) When the college graduate is hired he enters in a classification 
called pre -professional which is not exempt from the Federal Wage and 
Hours Laws. Depending upon the division in IBM in which he is hired, 
our new pre -professional may have anywhere from six to twenty-six 
weeks of programmer training. The twenty -six week training course is 
populated by candidates for our programming systems activities. The 
first twelve weeks of this course are formal class lecture with some hands- 
on experience. During the last fourteen weeks the trainee is a member of 
a kind of programming job shop, if you will, where he is managed by expe- 
rienced programming managers and where his assignment is to program 
actual applications on a kind of sub -contract basis. This is a type of very 
careful on-the-job training that is closely supervised by people who have 
extensive management and training experience. At the end of the twenty- 
six week period, those trainees who have successfully completed their 
assignment (and not all of them do) are given a permanent assignment in 
one of the regular programming groups. 

Those new hires who do not go into the twenty-six week course, but who 
have a shorter term - six or eight weeks, receive formal lectures and, 
of course, some hands-on training. At the end of this formal training 
period they go directly into a permanent assignment with one of the 
programming groups. 
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Once the trainee has received his first permanent assignment, and 
from then on, he is under the direct technical supervision of an 
experienced programmer. This experienced programmer will usually 
be someone with at least two or more years of experience, and may be 
the actual first line manager of the project. 

From this point on, then, the pre -professional's progress depends upon 
what he can demonstrate. On the average, after twelve to eighteen 
months, the pre -professional is eligible for promotion to exempt status. 
If he does not show that he is ready for promotion after two years, then 
we feel he is not eligible to continue as a programmer. This means 
either reassignment, or termination from the company. 

For the non college graduate, we have several programming technician 
positions which are designed to take care of two problems. The first 
problem we are trying to solve is that of taking care of the non- 
professional activities that go with every programming job. When I 
say non -professional I am really speaking in the legal sense as implied 
by the Fair Labor Standards Act; and I am not trying to raise the 
question of whether programming really is a profession or not. 
Remember that to be eligible for a professional exemption one must 
have as his primary duty "work requiring knowledge of an advanced 
type in a field of science or learning customarily acquired by a pro- 
longed course of specialized intellectual instruction or study, and this 
work must require the consistent exercise of discretion and judgment.' 1 
Alternatively, the work must be "original or creative in character in 
a recognized field of artistic endeavor" and the result must depend 
Ir primarily on the invention, imagination, or talent of the employee." 
Clearly there is much routine activity that goes along with all 
programming jobs but does not meet the definition just stated for 
professional exemption. Some of these activities are for example, 
setting up job decks for machine processing, key punching correction 
cards, preparing in -put data for automated flowcharting, to some 
extent generating data for program testing, assembling program 
documentation and writing procedures for the computer operator to 
use, and up-dating operating systems by use of specifically designed 
utility programs, and so on. Using these activities as a basis, we 
have defined our first technician level job to consist primarily of such 
activities. We think that one Programming Operations Aide can 
perform these duties for a group of about a half dozen full time 
programmers. 
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The educational requirement for this position is a high school diploma. 
This is a new position that has been in existence in IBM for less than 
a year, and it is frankly experimental. We won't know for another 
year or two just how well it will work out. If the candidate has college 
credits but no college degree, after his initial training period he 
becomes a Programming Technician. The job of the Programming 
Technician includes some of the activities of the Programming 
Operations Aide, but also includes coding of well defined sub -routines 
from detailed flowcharts. 

At the top of our technician path we have a Senior Programming 
Technician. His duties are primarily to flowchart, code, and debug 
complete computer programs from well defined specifications. These 
programs are usually at the level of routine utility programs, and are 
essentially always self-contained. The Senior Programming Technician 
is of course also responsible for the documentation of his program, and 
more or less for the installation of the program in an operational 
environment. 

The second problem we hope to solve by use of the technician career 
path is, of course, the problem of scarcity of qualified programmers. 
We hope to attack this problem in two ways. First of all, if indeed we 
do succeed in defining the non -professional activities that accompany 
the program task and in delegating these to our technicians, then we 
have relieved the professional programmer of some of his less produc- 
tive activity; and he will devote his time to more creative tasks, such 
as systems specification and design. The net result then is to let the 
more creative programmer spend more of his time in creative activity, 
thus increasing the total productivity of the entire programming group. 

Secondly its clear that many of the non -professional activities I have 
described don't require the attention of a college graduate. Thus, use 
of the technician positions permits us to consider a group of prospects 
that is much broader than we could consider without these positions. 
Our first level technician requires only a high school or prep school 
diploma. The top level technician requires two years of college or the 
equivalent . 

We think the technician career path is quite good -the first level 
technician, the Programming Operations Aide, can either learn 
programming, or can go into machine operations. The top level 
technician, the programming specialist, is certainly sophisticated 
enough to go into operations management of a reasonably large comput- 
ing center. On the other hand, if indeed he truly demonstrates a keen 
understanding of programming, and if his manager makes the business 
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judgment that he can be successful in programming, then he to can 
be considered for promotion to the same exempt position to which 
we promote the pre -professional. This is not a loophole; it is up 
to management to present evidence that the man truly has learned 
enough about the job that he can be expected to perform in all ways 
as well as the pre -professional who was promoted. Our statistics 
show that some twenty or twenty-one percent of our professional 
programmers do not have a college degree. 

Our first key position, then, is that held by our first level exempt 
programmer. Traditionally he is known as an Associate Programmer. 
The position is key because the Associate Programmer must truly 
demonstrate that his career lies in programming. 

The next key position, and probably the most important one we have, 
is a position at what we call the staff level (Figure 2). There are 
really three jobs at this level - all equally important to the company, 
and all comparably rewarded. It is at this level that our first true 
manager appears. This Project Programmer is in all respects a 
manager; he is responsible for hiring, training, supervising, salary 
administration, promotion, and firing. We expect him to be tech- 
nically qualified to direct a project, and to be fully involved 
technically in the programming activities of the project. Ideally he 
manages a group of six to ten programmers. If the group is small, 
he can spend roughly seventy percent of his time in technical matters, 
the remaining time being given over to administrative and personnel 
activities. If the project is larger, then he will typically have in his 
group a programmer at his own level who will act as a project leader. 
This project leader is called a Staff Programmer and is the second 
of the three jobs I mentioned. The project leader has all of the 
technical responsibilities that the project manager has, but does not 
have the administrative and personnel responsibilities. 

Roughly half of our staff level programmers are managers, another 
quarter perform the project leader duties, and the remaining staff 
level programmers -the third job-act in the classical staff capacity - 
that is, they perform as an extension of management. Generally 
speaking they act as trouble shooters, as gatherers and analysisers 
of data, as technical consultants, and to some extent can make 
decisions when the authority has been delegated to them. They also 
double in brass as project leaders when circumstances warrant - 
usually for short periods of time. 
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We are organized this way because we want our projects to be small, 
and we think the person in the best position to perform the managerial 
duties is really the leader of the project. After all, he is the man on 
the spot who is in the best position to know the capabilities of the 
people who work for him and, therefore, given adequate training, he is 
in the best position to make the managerial decisions that relate to his 
people. 

The use of the Staff Programmer as a project leader is really a 
compromise. Since IBM's programming activities are expanding 
almost as rapidly as the programming field itself, it is always difficult 
to find people who are well qualified to assume the combined technical 
and administrative responsibilities of first line management as we 
conceive it. Moreover, many of our technically qualified people are 
just not interested in becoming managers. Thus there is always a 
scarcity of first level managers and we are faced with the necessity 
of using technical project leaders. The problem we have to guard 
against is that if a project grows too large then its first level 
manager may tend to shift the administrative and personnel respon- 
sibilities onto the shoulders of the project leader. The project leader 
then becomes a manager without portfolio and without accountability. 

From the technical standpoint, the project manager or project leader 
works from objectives. He is responsible for a complex project, and 
he is responsible for specification, negotiation of interfaces, imple- 
mentation, documentation, the whole works. In general, he is not 
responsible for the total programming system or large application, 
but for a complex but recognizable sub-section. Typical examples 
would be a FORTRAN compiler, a set of mathematical subroutines, 
etc. The total systems or applications responsibility rests with the 
next level or even the one beyond that. I won T t go into detail about 
these next two levels except to say that we have both managerial and 
non managerial positions at these higher levels as you can see from 
Figure 2. We have dual promotional opportunities in the managerial 
and technical activities. 

A little arithmetic (Figure 3) will show that if we restrict the project 
manager to a group of six and if we restrict the second and third level 
managers each to having six managers report to him, then if we 
include the managers in our counts we can take care of a group of 
fourty-three people with only two levels of management and this grows 
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to 259 people if we have one third level manager. Analogously, if 
we allow each first level manager to manage ten people but still say 
that a second or third level manager may only have six managers 
reporting to him then the three levels of management include 403 
people. In the first case if the ratio of people to first level managers 
is six to one then the overall man-manager ratio comes out five to 
one. If the first level ratio is ten to one, then the overall ratio 
becomes slightly more than eight to one. 

I have just one more comment on the responsibilities of the project 
manager. Clearly if the programs to be written are not so complex 
as to require six programmers or more on the particular project, 
there is no reason why a project manager may not have the responsi- 
bility for implementing a number of small programs. In this case he 
still manages a small group in which one or more of his programmers 
are responsible for a complete program. 

We think the entire structure is quite flexible, and have found that it 
works very well for us over a variety of technical activities. 

As I promised earlier, I want to show you a breakdown of the 
educational background of our programmers as of the end of 1966. 
Figure 4 shows the educational level and Figure 5 the field of study of 
our exempt programmers. Four percent of the records I consulted 
did not give the educational level, and fifteen percent did not carry 
the field of study. Otherwise, the figures should be self-explanatory. 

Finally, I'd like to turn my attention now briefly to the question of 
selection. I say briefly because I don't have too much to tell you. I 
have talked about our educational requirements. Beyond this, all 
inexperienced candidates are required to take the current version of 
the PAT test. We are presently involved in a study which we hope 
will help us better validate the PAT test and which we hope will also 
give us a lead on other tests which might possibly be used in the 
selection process. Presently our study has given us ample indication 
that we don't understand all the ramifications of the PAT test. This 
test was originally validated against performance in training programs. 
It has never been satisfactorily validated to my knowledge in IBM 
against actual programmer performance. We are attempting to do 
this now, and will make the results available after the study is 
completed. 
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We also have indications that there will be one or two other tests that 
might be very useful in predicting whether or not a programmer will 
be successful. Unfortunately, at this point in time it is premature to 
discuss our findings. Again, though, we will be happy to make our 
information available when the study is complete. 

Beyond this, I can only tell you that the judgments you must make 
when you hire programmers are bound to be subjective. In my own 
experience I have found that the interviewers who are right more 
often than wrong in the subjective judgments are the interviewers 
who are most people oriented. In lieu of any other more objective 
indicators, I think you must select as interviewers those people on 
your technical staff who appear to be most sensitive to the people 
around them. 
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SESSION NUMBER T.2.1. 
SPEAKERS 

DAN FULLAN (IBM) PRESENTED WM. GARRISON < IBM), MODERATED BY 
D.R. MC ILVAIN 

DISCUSSION 

PRESENTATION ON PL/I BY IBM, INDICATING THE INTENT OF PL/I, 
USAGE £ EXPERIENCE TO DATE, AND FUTURE PLANS (INCLUDING ADDITIONAL 
PUBLICATIONS FOR USER EDUCATION). 

FUTURE PLANS FOR PL/I UNDER DOS INCLUDE 

1. ADDITIONAL DOCUMENTATION 

2. INCLUSION OF INITIAL ATTRIBUTE 

3. SCIENTIFIC SUBROUTINES WILL BE AVAILABLE FOR OS PL/I AS 
TYPE 3 SUPPORT,, 

4. EXPANSION OF OBJECT TIME DIAGNOSTICS 

5. CONSIDERATION OF CREATION OF IS FILE UNDER DOS PL/I. 

6. SIFTS FROM COBOL OR FORTRAN ARE BEING CONSIDERED. 

7. PL/I OBJECT PROGRAMS WILL BE AVAILABLE FOR OBJECT TIME 
EXECUTING IN FOREGROUND UNDER RELEASE OF DOS SCHEDULED 
FOR A/68. 

THE PHILOSOPHY BEHIND PL/I HAS BEEN THAT SUPPORT OF EXTENSIONS 
IN 3RD GENERATION EQUIPMENT 6 TECHNOLOGY WOULD BE MADE 
PREFERENTIALLY INTO PL/I OVER FORTRAN OR COBOL. 
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SESSION NUMBER T.2.3 



SPEAKERS 

LAURA AUSTIN 

DISCUSSION 

VOLUNTEERS WERE SOLICITED FOR SERVICE ON THE THE NOMINATING 
COMMITTEE, EXECUTIVE BOARD, AND PROJECTS. THERE WERE 10 PEOPLE 
ATTENDANCE. NAMES WILL BE REFERRED TO THE APPROPRIATE PERSONS. 
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SESSION NUMBER T.2.4. 
SPEAKERS 

BRIAN SWAIN OF SHAWI NIGAN ENGINEERING SPOKE ON THE 1130 SINGLE DISK 
SORT PROGRAM. W.C. BLACKNEY OF DOW SPOKE ON RUNNING A MEMORYSCOPE 
THRU THE 1130» 1627 PLOTTER ATTACHMENT. 



DISCUSSION 

LARRY WHALEN CHAIRED THE MEETING. WE HAVE DECIDED TO 
A COMMITTEE TO INVESTIGATE FORTRAN AND MONITOR V2. THIS 
WILL BE FORMALLY ORGANIZED AT A LATER DATE. 



ESTABLISH 
COMMITTEE 
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PMERG - A FAST SORT -MERGE 
SUBROUTINE FOB IBM lljO 

B. J. SWAIN 



THE SHAWINIGAN ENGINEERING CCMPAHY LIMITED 
SEPTEMBER 196? 



CORRIGENDUM 



The following errors have been observed in the version of 



this program which was distributed at the Cincinnati COMMON. 



1. APPENDIX 3 (Source Listings) 
Subroutine IPTSK, statement 20k + 2 
Remove the following statement: 

IF(IR)290,207,299 
and replace by 

IF(IR)299>207,290 
The previous version of this statement caused 
alphabetic sorting to be performed in des- 

cending order if KE¥(l,l) is positive. i^j 

2. APPENDIX 1 - Users Guide 
Page 10. 

The equation for the calculation of the length 
of IW0RK is incorrectly stated as 

2*(N*m0K+IREP)+lO 
replace this with the equation 



2*(N*IBL0K+5 s 



No program error is associated with this 



correction. 



These corrections have been incorporated in the following 



text. 
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ABSTRACT 



This subprogram sorts a disk file into ascending or descending 
order as determined by any number of control fields. It is self- 
adjusting to make use of available storage, and if the sequence 
length requires, sorts the file by sections, which are subsequently 
merged. The maximum length is determined by available disk space. 
Maximum speed is achieved by reduction of manipulation of data on 
the disk. The subprogram is coded in IIJO Fortran, and is compatible 
with COMET and IDEAL. 
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DISCLAIMER 

Although each program has been tested by its contributor, no warranty, 
express or implied, is made by the contributor or COMMON USERS Group, 
as to the accuracy and functioning of the program and related program 
material, nor shall the fact of distribution constitute any such 
warranty, and no responsibility is assumed by the contributor or 
COMMON USERS Group, in connection therewith ♦ 



PMERG - A FAST SORT-MERGE 
JP3R0UTINE FOR IBM 1150. 

Purpose 

An IBM 1130 computer vas installed at The Shawinigan Engineering 
Company Limited offices in Montreal, Canada in January 19&7* 
Although this machine was primarily intended for the solution 
of engineering problems, it was planned to use it for a considerable 
range of commercial applications. The principal ones of these 
were Payroll, Labour Distribution, and Cost Analysis. It was 
recognized that a fast sort-merge program vas required, principally 
in order to produce sorted reports for these commercial applications. 
A subprogram was therefore written in Fortran. In order to incor- 
porate the subprogram into several program packages it was made 
self-adjusting so that the amount of working storage could be 
allocated to suit the available core. Flexibility as to the number 
and type of sort keys (control fields) was also required. 

Features Incor porat ed. 

The following features, which will be discussed in more detail 
below were incorporated in order to achieve the aims required 
of the program 

a) Modular Structure 

b) A fast sorting Algorithm 

c) Extraction of sort keys from the records. 



Features Incorporated (cont'd) 

d) Record blocking 

e) Rejection of unwanted records before sorting, 

f) Self adjusting working storage. 

Modular Structure* 

The modular structure of the subprogram allows it to be incorporated 
into program packages being written by different programmers. 
The subprogram itself has an argument list which describes completely 
the file to be sorted, the number, position and type of the sort 
keys, the available working core storage and disk work files, 
and the disposition of the output* Two subprograms are called 
by the principal subprogram to perform first the sort and then 
merge operation. Since these are called only once they may be 
localled against each other, thus freeing additional core space 
for working storage. 

Sorting Algorithm. 

The sorting algorithm used is Shells method, which is a successive 
merging process of sequences which start at 2 or 3 entries in 
length and are subsequently merged until a single file results. 
Advantage is taken of any previous ordering of the file, by 
recognizing in the merging process that when one sequence is 
exhausted then examination of the other sequence is not required. 
This algorithm has been found to be superior in speed to algorithms 
incorporating sorting by exchange, and does not require excessive 
coding. 

IV 6 
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Extraction of Keys from Records . 

In view of the large access time required for the 2315 disk, 
it is vital that the amount of information removed and written 
on the disk is reduced as far as possible. The program was 
therefore written as a tag-sort. The output from the sub- 
routine is a file of one word records, each entry in the file 
being a pointer to the record to be processed in the main file 
in accordance with the required order. Also,the program was built 
around the concept that the sort keys would be removed from the 
record on the disk and only these moved in the subsequent 
processing. The procedure of removing these sort keys from 
the record also increases the number of records which can be 
sorted in one phase prior to the merging process. During the 
sort phase the working storage contains records organized as 
follows : 

Pointer to record in main file 
Sort keys 

Pointer to indicate position in working storage of 
high order key. 

In the sorting process only the pointer to indicate the position 
in working storage of the high order key is moved thus increasing 
the speed of the sorting procedure. At the end of the sorting 
phase disk records are written consisting of the following 

Record number 

Sort keys 
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Extraction of Keys from Records (cont'd) 
These subsidiary records are stored on working files and 
subsequently merged. In the last phase of the merging process 
the record numbers only are written onto a disk file which 
then forms the pointer file to the main file. 

Record Blocking . 

In order to speed the transfer of information from and to the 
disk a system of record blocking is employed. Blocking sub- 
routines have been written and incorporated into the sort-merge 
program^ to assemble records into blocks before writing them 
on the disk or after retrieving them from the disk. The 
number of records contained in one block can be adjusted by the 
user. 

Rejection of Unwanted Records. 

It is frequently found that for a particular report only a 
portion of a file is required. Time can therefore be saved 
if only those records which are required are sorted and the 
remainder not processed. The user is permitted to employ 
this technique by writing a subroutine to determine for each 
record whether or not it is required in the sort. The name 
of this subroutine is included in the argument list in the 
sort-merge subprogram and in an external statement in the 
main program calling the sort-merge subroutine 
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Self -Ad just L edj^orking Storage . 

The lifiilted core available on the IBM 11J0 demands that space 
allocated to variable storage is somewhat restricted. At the 
same time, for a sorting program, it is obviously desirable 
that the maximum use be made of core storage in order to reduce 
the processing time. In order to achieve a balance between 
these two mutually exclusive requirements, a feature was included 
in the program whereby the amount of available wording storage 
was used as a parameter supplied by the user thus permitting the 
program to calculate the maximum number of records which would 
be sorted in one phase, the number of phases which would be 
merged at one cycle and hence the number of merge cycles which 
would be required in order to complete the merging process. 
During the sorting process the number of records which can be 
sorted in one phase is calculated by dividing the available 
working storage length by the length of the subsidiary record 
containing of the pointer to the records in the main file, the 
sort keys and the pointer to indicate the position in working 
storage of the high order key. During the merging process 
working storage contains buffers to hold the subsidiary records 
from the working files of the disk. The number of these which 
can be contained simultaneously is calculated by dividing the 
working storage by the length of one buffer. In the demonstration 
program given in the appendix to this paper, the available 



Self -Adjusted Working Storage (cont'd) 

working storage is 1,850 words. Each record sorted generates 
10 words to be contained in working storage during the sorting 
process. Thus 185 records are sorted simultaneously, and the 
total file, from which 8ll records have been extracted, is 
sorted in 5 phases. The read buffers have a length of 325 
words, which permits these 5 phases to be merged simultaneously. 

Performance. 

The following sorting times have been observed: 

1) Sorting 10,000 10 word records having 3 integer 
sort keys - 37 minutes. 

2) Sorting 8ll 32 word records having 5 sort keys, 
integer, double word integer, real and alphabetic, 
occupying a total of 8 words - 2-| minutes (This 

is the demonstration program included in appendix 3 
of this paper) . 

The program has been in regular use sorting reports for commercial 
applications, the longest of these requires sorting 7>000 records 
having 6 sort keys occupying 7 words. Sort time for this job 
is 20 minutes. 

Compatibility . 

The sort-merge subprogram is compatible with COMET (library 
program No. 3.0.002) for handling alphabetic arrays, and IDEAL 
(library program No. 3.0.00*0 for handling double word integers. 

IS'O 
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Compatibility (cont'd) 

It can be made compatible with the IBM Commercial Subroutine 
Package by making appropriate changes to the calls to Sub- 
programs for comparison of alphabetic arrays, by substituting 
variable length integers for double-word integers, and by appro- 
priately increasing the storage allocation for sort keys. Due 
to the increased space required for data storage, vhen using the 
Commercial Subroutine Package, in comparison with that required 
for COMET and IDEAL, the performance of the sort-merge program 
would be adversely effected. 

Conclusions. 

A sort-merge subroutine coded in Fortran has been presented. 
It has been shown that with careful coding it is entirely 
feasible to perform a disk sort on the IBM 1130 computer. It 
is possible to sort files containing as many as 10,000 records 
in a reasonable length of time. This covers the normal 
requirements of a small computer installation. 
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Appendix 1 USERS GUIDE 
Calling the Sort -merge Subprogram* 

PMERG is a subprogram to sort a disk file into ascending or 
descending order, using sort merge partitioning to reduce 
the core working storage requirement. The maximum sequence 
length is determined by the available disk storage only. 
The argument list is as follows: 

CALL PMERG ( IFILE, N, J, L, KEYS, IKEY, IW0RK, 

NW$RK, IBUF, IBL^K, IWRKL, TWRK2, 

IFPT, IUSE, K0UNT) 

IFILE ~ Number of disk file containing information 
to be sorted. (File should be written 
completely on the disk before calling 
PMERG). 

N = Logical record length in IFILE. 

J = Position in IFILE of first record to 
be sorted. 

L - Number of logical records to be sorted. 

KEYS « Previously defined array to determine 
position and type of sort keys in file 
record. In the calling program, the 
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Calling the Sort -merge Subprogram (cont'd) 

array must appear in DIMENSION statement, 
vith dimension (Ij-,IKEY). For the I'th 
sort key, the value to be assigned to 
the elements of KEYS are as follows : 



Sort key 
type 


One word 
integer 


Double word 
integer 


Alphabetic 


Real 


KEYS(l,l) 


1 

-1 if descend 
ing order 


2 

-2 if descend 
ing order 


3 

-3 if descend 
ing order 


k 

if descend 
ing order 


KBYS(2,I) 


Position in record of high-order word of key. 


KEYS (3, I) 


Not used 


Character posi 
tion of left 
most character 
relative to 
KEYS(2,I) 


Not used 


KEYS(M) 


Not used 


No. of cha- 
racters 


Not used 



-10- 



Calling the Sort-merge Subprogram (cont'd) 



IKEY 
IW0RK 



HWjfeK = 



IBUF - 



IBL0K = 



IWRKL = 



Number of sort keys* 
Working storage array, used to hold 
sort keys and as a transfer buffer 
for disk records. Required length is 
2*(N*3£L$C-5)« IBL0K is defined below. 
IW0RK should appear in a DIMENSION 
statement in the calling program, and 
should be as long as possible to reduce 
number of merge cycles. 

Length of IW0RK. Corresponds to dimensioned 

size in calling program. 

Read buffer for disk records. Required 

size is N*IBL0K+5. N*IBLjfe is physical 

record size to app.ear in define file 

statement for all disk files i.e. 

IFILE , IWRKL , IWRK2 , IFFT ♦ IBUF should 

appear in a DIMENSION statement in the 

calling subprogram. 

Number of logical records blocked to 

form one physical, record on disk. 

Number of disk file for first working 

storage. Required number of physical 

records is (K^UNT-1)/(N^IBL0k/IREP)+1. 

K$Um and IREP are defined below. 
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Calling the Sort -merge Subprogram (cont'd) 

IWRK2 = Number of disk file for second working 
storage. Required number of records 
same as IWRK2. 
IFFT - Number of disk file to contain returned 

values. Entries in IFFT are record numbers 
corresponding to required order. Required 
number of physical record is 
(Kj5UNT-l)/(N^rBL0K)+l. Logical record 
length is 1. 

IUSE = The name of a function subprogram supplied 
by the user, having the form 

FUNCTION IUSE (IHBC) 
whose purpose is to determine if a 
record is to be included in the sort. 
IREC is a single subscripted array 
containing one record. 
The function returns 1 if this record 
is to be included, and 2 if this re- 
cord is not to be included. 
IUSE is a dummy name. The true name 
assigned must be included in an EXTERNAL 
statement in the calling program. Use 
of the subprogram INTAK included in 
Appendix 3 vill cause all records to 
be included. 

/ST 
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Calling of Sorb-merge Subprogram (cont'd) 

K0UNT * Output variable. The number of records 
found to be in this sort, when examined 
by subprogram IUSE. 

IREP is logical record length of record 
containing sort keys and pointer to 
record to which keys belong. 
Allow 1 word for pointer 

1 word for each integer key 

2 words for each double word 
integer key 

1 word for every 2 characters of 
alphabetic key 

2 words for each real standard 
precision key 

3 words for each real extended 
precision key. 
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Requirements for Calling Program, 

The calling program must comply with the following requirements : 

1) It must use the *#NE W$RD INTEGERS option. 

2) If double word integers are used, it must use standard 
precision real variables. 

3) It must contain an EXTERNAL statement defining the 
name of the user-writer function subprogram, referred 
to as IUSE in the argument list of PMERG. 

k) It must contain DIMENSION statements, allocating 
storage for IBUF and IW0RK. 

5) It must contain DEFINE FILE statements for the 
disk files. The physical record length for all 
four files used by the sort -merge subprogram is the 
same, being N*IBL0K. 

6) It must define the KEYS array. 

7) It must define all other arguments in the CALL 
statement, except K^UITT, which is an output 
variable. 

Use of Recor d Blocking. 

The record blocking subroutines DCL0S, DPOT and DGET are 

used by this subprogram, and their use for all record handling 
is recommended. 

The following definitions and standards are used for all record 
blocking subroutines 

LOGICAL RECORD - the record stored in the buffer. 

/5"7 
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Use of Recor d Blocking ( cont * d ) 

PHYSICAL RECORD - the record stored in the file 
PHYSICAL RECORD LENGTH as defined in the DEFINE FILE 
statement is either: 

LOGICAL RECORD LENGTH * Number of Logical Records in Block 

or 

320 

whichever is less. 

All the following subroutines use the file buffer IBUF, which 

contains control words to regulate the reading and writing of 

records, and also is used for assembling the block of records 

for transfer to and from the disk. The following is the appearance 

of the file buffer. 

IBUF(l) * File number 

IBUF(2) = Logical record length 

IBUF(3) - Number of logical records in block 

IBUF(^) = File type. = 1 when block has only been 

used for GET operations 

(i.e. is identical to equivalent 

records on disk) 

= 2 when block has been used for 

PUT operations. 

IBUF(5) = Number of first logical record in the block 

now resident in the file buffer. Set to zero 

if no record has been transferred to the buffer. 

IBUF(6) = Blocked records, 
etc. * 
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Use of Record Blocking (cont'd) 

IBUF mast appear in the calling program with dimension 

LOGICAL RECORD LENGTH * Number of RECORDS IN BLOCK + 5 
This should be set as large as core space permits. 

The subroutine arguments lists are as follows : 

CALL D^PEN (IBUF, N, J, L ) 
To open a file "buffer. Sets initial values to the file control 
words. No transfer of information to or from disk takes place. 
IBUF *= Name of file buffer 
N ~ File number 
J = Logical record length 
L * Number of logical records in block. 

CALL DGET (IBUF, K, IA) 
To transfer logical record K of the file to the array IA. If 
the required record is already resident in the buffer, it ±3 
immediately transferred. If it is not, the block of records in 
the buffer is stored if necessary, and the correct block of 
records obtained from disk. Transfer then takes place. 

IBUF » Name of file buffer 

K - Required logical record 
IA - Array to contain record obtained. 
Note that IA is integer. If real values are required, they can 
be obtained by use of a suitable EQUIVALENCE statement, in which 
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Use of Record Blocking (cont'd) 

real variables are assigned to EVEN locations in the array IA. 

The real variables then occupy the designated location, and the 

next lower location in the array e.g. 
DIMENSION JA(kO) 
EQUIVALENCE (B,IA(l6)) 
B occupies IA(l6) and IA(l5) 

Note: The use of an EQUIVALENCE statement in this way is not 
strictly speaking permitted. However, it works satis- 
factorily, providing nothing is done to force the 
addresses of real variables onto uneven word numbers. 
To prevent this, the following rules should be observed. 

1) Equivalence only to even locations in the integer 
array, IA. 

2) The integer array IA should be dimensioned to 
an even number of words. 

3) If IA is in COMMON, then any previous variables 
in COMMON together occupy an even number of words, 
e.g. COMMON IX, IY(2) ,IZ,IA(20 

EQUIVALENCE (lA(2),B) 

COMMON IX, IA(20) 1 

V is not valid 

EQUIVALENCE (IA(2),B) J 



/CO 



is valid 
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Use of Record Blocking (cont'd) 

CALL DPUT (IBUF, K, IA) 
To transfer the array IA to logical record K of the file. 
Operation is similar to DGET. The contents of IA are trans- 
ferred only as far as the file buffer, and not written on disk. 

CALL DCL^S (IBUF.) 
To close the file. If a Mock or records requires transfer to 
disk, the transfer is made. 

CALL DUSE (IBUF, K, M, KEY, KL) 
The subroutine is called by DGET and DPUT to perform the disk 
reading and writing operations, and to generate a pointer to the required 
record in the file buffer. It is not normally called directly by 
the user. 

Erro rs : 

One error message is included in the sort-merge subroutine 
PAUSE 3333 indicates that the working storage allocated is too 
small to permit at least two phases of the file to be merged. 
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Appendix 2 - P ROGRAM STRUCTURE 
The following programs are included in the package: 

FMERG - Principal subprogram, calls SRTPH and MRGPH 
to perforin sorting and merging operations 
respectively. 

SRTPH - Extracts keys from records. Performs sorting 
operation. Makes up a file containing sort 
keys and pointers to records included in the 
sort . 

MRGPH - Performs merging operation • Outputs the file 

of pointers to records in the main file. 
IFTSK - Function subprogram to compare two sets of 

sort keys, in order to determine which record 
should be processed first. 
D$PEN - Initializes a disk buffer for blocking operations. 
DGST - Gets disk records - transfers logical disk 
records from disk buffer to primary storage. 
DPUT - Puts disk records - transfers logical disk 

records from primary storage to the disk buffer. 
DCLjfe - Terminates a disk writing operation* 
DUSE - Called by DGET and DPUT to transfer blocks of 

records to and from the disk, as required. 
MINjiJ - Function subprogram to determine the minimum 
two variables. 



-19- 



Program Structure (cont'd) 



QC0MP) - 

) COMET subprograms 

QGRAB) 



DISGN) 
) 

IHT) IDEAL subprograms 
) 

SD) 

In addition, the demonstration program requires the use of the 

following subprograms, 

LARGE - Subroutine to determine if a record is to be 

included in the sort. 

MDIA - IDEAL subprogram 

QPASS) 

) COMET subprograms 

QSHUV) 
Also included 

IHTAK - Subroutine to include all records in the sort, 

Core Storage Requirements . 

Storage requirements are as follows : 

PMERG 82 words 

SETHI " 

MRGPH 662 w 

IFTSK 33^ " 

D0PEN 56 tt 

DGET 68 tt 



IQ3 
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Core Storage Requirements ( cont * d) 



DPUT 


68 words 


J-J V.' >>J 


132 


ft 




232 


If 


KTN0 


50 


11 




52 


ft 


QGRAB 


12 


It 


DISGN 


30 


tl 


INT 


22 


It 


SD 


3* 


It 


TOTAL 


2,^78 


ft 



This figure is reduced if SRTPH and MRGPH are localled. 
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Appendix 3 - Listings 



// JOB SWAIN SORT-MERGE PROGRAMS 

// FOR 

*ONE WORD INTEGERS 
*LIST SOURCE PROGRAM 

SUBROUTINE PMERG( IFILE •N » Jf LiKEYS » I KEY * I WORK > NWORK » I3UF t I3LCK* 
SI WRK1 • IWRK2 * IFPT, IUSE »KOUiMT ) 
C SUBROUTINE TO SORT A DISK FILE* USING SORT-MERGE PARTITIONING* 

C TO REDUCE CORE WORKING STORAGE REQUIREMENT. SEQUENCE LENGTH 

C DETERMINED BY DISK WORKING STORAGE FILE LENGTH 

C CARDS MARKED EXT IN COLS 70-72 REFER TO EXTENDED PRECISION EXT 
C FLOATING POINT KEYS. THESE STATEMENTS SHOULD BE SUBSTITUTED EXT 
C FOR THE PRECEDING STANDARD PRECISION STATEMENTS * IF EXTENDED EXT 
C PRECISION IS REQUIRED. NOT E THAT HIGH PRECISION INTEGERS EXT 
C CANNOT BE US ED WITH EXTENDED PRECISION. 



C I F I LE-NUMBER OF DISK FILE CONTAINING INFORMATION TO BE SORTED 

C N ^LOGICAL RECORD LENGTH IN IFlLE 

C J ^POSITION IN I FILE OF FIRST RECORD TO BE SORTED 

C L = NUMBER OF LOGICAL RECORDS TO BE SORTED 

C KEYS =TABLE TO CONTAIN SORT KEYS, DIMENSIONED (4*lKEY) WHERE 

C IKEY IS NUMBER OF SORT KEYS. ENTRIES IN KEYS » FOR THE 

C I 1 TH SORT KEY ARE AS FOLLOWS 

C KEYS ( It I )= 1 FOR INTEGER 

C - 2 FOR D0U3LE WORD INTEGER 

C = 3 FOR ALPHABETIC 

C = 4 FOR REAL 

C ENTER KEYS ( 1 » I ) NEGATIVE IF SQRT IS REQUIRED IN DESCENDING 

C ORDER BY THIS KEY 

C KEYS(2*I) = POSITION IN LOGICAL RECORD OF HIGH-ORDER WORD 

C OF SORT KEY 

C KEYS (3*1) = POSITION OF LEFTMOST CHARACTER WITH RESPECT 

C TO KEYS(2>I> - ALPHABETIC KEYS ONLY 

C KEYS(4*I) = NUMBER OF CHARACTERS-ALPHABETIC KEYS ONLY 

C IKEY ^NUMBER OF SORT KEYS 

C I wORKsWORK I NG STORAGE ARRAY. USED TO HOLD SORT KEYS AND AS A 

C READ BUFFER FOR MERGING. REQUIRED LENGTH 

C IS 2*(N*IBLOK+5 ) . IBLOK IS DEFINED BELOW 

C IWORK SHOULD BE AS LONG AS POSSIBLE TO REDUCE NUMBER OF 

C MERGE CYCLES 

C NWORK=LENGTH OF IWORK. CORRESPONDS TO DIMENSIONED SIZE IN 
C CALLING PROGRAM 

C IBUF =READ- BUFFER FOR DISK RECORDS. REQUIRED SIZE IS N*IBL0K+5 
C N*IBL0K IS PHYSICAL RECORD SIZE TO. APPEAR IN DEFINE FILE 

C STATEMENT FOR ALL DISK FILES I.E. I FT LE » I WRK 1 » I WRK2 • I FPT 

C IBLOK=NO. OF LOGICAL RECORDS BLOCKED TO FORM ONE PHYSICAL RECORD 
C ON DISK 

C IWRK1=NUMBER OF DISK FILE FOR FIRST WORKING STORAGE. REQUIRED 
C NUMBER OF PHYSICAL RECORDS IS < KOUNT-1 > / < N*I BLOK/ I REP > +1 

C KOUNT + I REP ARE DEFINED BELOW 

C IwRK2=NUMBER OF DISK F^LE FOR SECOND WORKING STORAGE. REQUIRED 
C NUMBER OF RECORDS SAME AS IWRK1 

C IFPT»NUMBER OF DISK FILE TO CONTAIN RETURNED VALUE. ENTRIES IN 
C IFPT ARE RffCORD NUMBERS CORRESPONDING TO REQUIRED ORDER 

C REQUIRED NUMBER OF PHYSICAL RECORDS IS ( KOUNT-l ) / (N*I BLOK )+l 

C LOGICAL RECORD LENGTH IS 1 

c i use ^function subprogram supplied by user having the form 

C FUNCTION lUSECl-REC) 

C WHOSE PURPOSE IS TO DETERMINE IF A RECORD IS TO BE 

C INCLUDED IN THE SORT 

C IREC IS SINGLE SUBSCRIPTED ARRAY CONTAINING 

C ONE RECORD / £ £ 



c 
c 
c 
c 

c 
c 
c 
c 
c 
c 
c 

f* 
K. 

c 
c 
c 
c 
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FUNCTION RETURNS 1 IF THIS RECORD IS TO BE INCLUDED 
FUNCTION RETURNS 2 IF THIS RECORD IS NOT INCLUDED 

lUSE IS A DUMMY NAME. THE TRUE NAME ASSIGNED MUST BE INCLUDED IN 

AN EXTERNAL STATEMENT IN THE CALLING PROGRAM 

EXTERNAL I USE 

KOUNT=NO. OF RECORDS FOUND TO BE IN THIS SORT* WHEN EXAMINED 
IN SUBPROGRAM IUSE 
IREP IS LOGICAL RECORD LENGTH 
KEYS AND POINTER TO RECORD TO 
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OF RECORD CONTAINING SORT 
WHICH KEYS BELONG 



ALLOW 



WORD FOR POINTER 
WORD FOR EACH INTEGER KEY 
WORDS FOR EACH HIGH PRECISION 



WORD FOR EVERY 
WORDS FOR EACH 
WORDS FOR EACH 



INTEGER KEY 
2 CHARACTERS OF ALPHABETIC KEY 
REAL STANDARD PRECISION KEY 
REAL EXTENDED PRECISION KEY 



DIMENSION KEYS(4»10> »IWORK( 100) »IBUF(320) 
FOR INDEXING ONLY. TRUE SIZE IN CALLING PROGRAM 

CALL SRTPHt IFILE,N » J » Li KEYS » I KEY » I WORK i NWORK. I 3UF » I BLOK * I WR Kl » 
SI REP* I3LKK* IUSE.KOUNT ) 

CALL MRGPH ( N » KEYS » I KE Y » I WORK » NWORK ♦ I BUF » I BLOK » I WRKl » I REP » I BLKKt 
5KOUNT » I WRK2 » I FPT ) 

RETURN 

END 



FEATURES SUPPORTED 
ONE WORD INTEGERS 

CORE REQUIREMENTS FOR PMERG 
COMMON VARIABLES 

END OF COMPILATION 



PROGRAM 



80 



-25- 



// FOR 

*ONE WORD INTEGERS 
*LIST SOURCE PROGRAM 

SUBROUTINE SRTPH( IFILE.N ♦ J ♦ L. KE YS » I KEY » I WORK* NWORK ♦ I BUF » I BLOK ♦ 
SIWRK1 »IREP»I3LKK, I USE .KOUNT) 
C PERFORM SORT PHASE OF SORT-MERGE. OUTPUT IS FILE OF SORT KEYS AND 
C POINTERS TO RECORDS. FOR ARGUMENT DEFINITION? SEE CALLING PROGRAM 
C 

DIMENSION KEYS (4, 10 ) ♦ I WORK ( 500 ) , I BuF ( 32 5 ) 
C FOR INDEXING ONLY. TRUE SIZE IN CALLING PROGRAM 
C 

C INITIALISE 

C JLAST IS POSITION IN IFILE OF LAST RECORD TO BE SORTED 

JLAST=J+L-1 
C JF IS POINTER TO RECORDS IN IFILE 

JF = J 

KOUNT=0 

C JUMP IS INTERVAL BETWEEN SUCCESSIVE ENTRIES IN IWORK 
JUMP=0 

C INITIALISE THIS PHASE 

C NNOW IS LENGTH OF SEQUENCE IN THIS PHASE 

150 NNOW*0 

C JG IS POINTER TO LAST POSITION IN I WORK ACTUALLY IN USE 
JG=0 

C LOC IS LOCATION OF HIGH-ORDER SORT KEY FOR NEXT RECORD 
LOC = 2 

CALL DOPEN(IBUF»IFILE.N*IBLOK) 
C RETURN HERE FOR NEW RECORD 

151 IF(JF-JLAST) 152»152»153 

152 IF( JG+JUMP-NWORK) 154.154.153 
C ANOTHER RECORD IS REQUIRED 

154 CALL DUSE ( IBUF»JF»0»1»KL) 

IF(IUSE ( IBUF(KL+1) )-l> 155.155.156 
C THIS RECORD TO BE INCLUDED IN SORT 
C ENTER RECORD NO IN WORKING STORAGE 

155 JG*JG+1 
IWORK< JG)=JF 

C ENTER KEYS IN WORKING STORAGE 
DO 103 IK=1»IKEY 
KEYTP=KEYS ( 1 » IK ) 
IF(KEYTP) 513.514.514 

513 KEYTP=-KEYTP 

514 JB=KL+KEYS(2.IK) 

GO TO(104.105»106.105) .KEYTP 
C KEY IS INTEGER 

104 JG=JG+1 

IWORK( JG)*IBUF( JB) 
GO TO 103 

C KEY IS HIGH PRECISION INTEGER OR REAL 

105 DO 111 I«l»2 

C 105 DO 111 I=l»3 EXT 
JG=JG+1 

X WORK <JG)«I BUF ( JS-1 ) 
C IWORKI JG) *I3UF< JB-2) EXT 

111 JB=JB+1 

GO TO 103 
C KEY IS ALPHABETIC 

106 KK=KEYS(4»IK) 

CALL QPASS(IBJF<JB>.KEYS(3»IiO » IWORKt JG+1 ) .1 »KK) 
JG*JG+{KK+l)/2 . . „ 
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103 CONTINUE 
G FIRST RECORD IN SORT » SET IREP AND JUMP 
IF(JUMP) 158>158*157 

158 IREP»JG 
JUMP«IREP+1 

I BLKK S N* I BLOK/IR EP 
C WRITE LOCATION OF HIGH-ORDER SORT KEY AND 
C INCREMENT SORTING SEQUENCE COUNTERS 
157 JG»JG+1 

IWORKI JG)*LOC 

LOC*LOC+JUMP 

NNOW=NNOW+l 
C INCREMENT RECORD COUNTER 
156 JF-JF+1 

GO TO 151 

C SEQUENCE COMPLETE* SORT BY SHELL'S METHOD* ONLY ENTRIES SHOWING 
C LOCATION OF KEYS I LOO ARE MOVED 
153 CALL DCLOSUBUF) 
M»NNOW 

96 IF(M-l) 208*208*98 

98 M=<M+2>/3 
MJ=M*JUMP 
M1J=MJ+JUMP 

DO 99 I J=M1J*JG» JUMP 

IMJ=IJ-MJ 

I1J=IJ+JUMP 

DO 97 LLJ=JUMP*IMJ,MJ 

JP1J=I1J-LLJ 

JPJ=JP1J-MJ 

LOC=IWORK( JPJ) v 
LOCl=IWORK( JP1J) 

IF( IPTSK(KEYS»IKEY*IWORK*LOC»LOCl)-l> 99*99*299 
C ELEMENTS ARE OUT OF ORDER 
299 IWORK(JPJ)=LOCl 

97 IWORK( JP1J)*L0C 

99 CONTINUE 
GO TO 96 

C SORT COMPLETE WRITE KEYS ON WORK FILE 
208 CALL DOPEN U 3UF • I WRKl » I REP » I BLKK) 
JPJ = 

IF(NNOW)301»301 *302 
302 DO 510 IPHAS«liNNOW 

JPJ=JPJ+JUMP 

KOUNT=KOUNT+l 

LOC« IWORK ( JPJ ) 
510 CALL DPUT(IBUF»KOUNT»IWORK(LOC-l) ) 
301 CALL DCLOS(IBUF) 
C IF FILE INCOMPLETE* GO BACK TO SORT ANOTHER PHASE 

IF(JF-JLAST) 150*150.159 

159 RETURN 
END 

FEATURES SUPPORTED 
ONE WORD INTEGERS 



ZORE REQUIREMENTS FOR SRTPH 
COMMON VARIABLES 28 PROGRAM 616 
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// FOR 

*ONE WORD INTEGERS 
*LIST SOURCE PROGRAM 

SUBROUTINE MRGPH< N . Ke YS » I KEY » I WORK . NWORK » I BUF ♦ I BLOK . I WRK1 . 1 REP . 
$ I BLKK tKOUNT * I WRK2 * I FPT ) 
C PERFORMS MERGE PHASE. INPUT IS FILE OF POINTERS AND SORT KEYS IN 
C IWRK1. OUTPUT IS FILE OF POINTERS IN IFPT 
C 

DIMENSION KEYS (4. 10) , I WORK ( 100 ) , I BUF ( 320 ) 
C FOR INDEXING ONLY. TRUE SIZE GIVEN IN CALLING PROGRAM 

DIMENSION NREAD ( 10 ) »NTRAN( 10) » I REC ( 10 ) » NRECL ( 1 ) » ISW( 10) 
C TABLE OF CONSTANTS FOR MERGE PHASES » ENTR I ES CORRESPOND TO 

C PHASES BEING MERGED 

C NREAD "POINTERS TO START OF READ BUFFERS IN IWORK 

C NTRAN "POINTERS TO START OF TRANSFER BUFFERS IN IWORK 

C IREC "POINTERS TO LOGICAL RECORD NOW BEING PROCESSED 

c nrecl ^numbers of last record in phases now being processed 

C ISW "PROCESSING SWITCH FOR PHASES 

C =1 WHEN FURTHER RECORDS EXIST TO BE PROCESSED 

C = 2 WHEN PHASE IS EXHAUSTED 

C CALCULATE CONSTANTS REQUIRED FOR MERGING 

C NPHAS IS NUMBER OF LOGICAL RECORDS TO BE SORTED IN ONE PHASE 

IF(KOUNT)622»622»30l 
301 NPHAS=NWORK/( IREP+1 ) 
C NPH IS REQUIRED NUMBER OF SORT PHASES 

NPH= (KOUNT-1 ) /NPHAS+1 

NBUF=IREP*I BLKK+5 
C NBUF IS LENGTH OF READ BUFFERS IN WORKING STORAGE 

NWAYS=MIN0<NWORK/NBUF»lO) 
C NWAYS IS NO OF WAYS SORT PHASES ARE MERGED 

NRR*1 

DO 512 ITEST*1» NWAYS 

NREAD(ITEST)«NRR 
512 NRR=NRR+NBUF 
C TEST LENGTH OF WORKING STORAGE 

IF(NWAYS-l) 505*505.506 
C WORKING STORAGE TOO SMALL 

505 PAUSE 3333 
CALL EXIT 

C INITIALISE FOR FIRST MERGE CYCLE 

C IFLIP IS SWITCH TO DETERMINE WHICH WORK FILE IS TO BE READ 

506 IFLIP*1 

C RETURN HERE FOR NEW MERGE CYCLE. NOWPH IS PHASE BEING PROCESSED 
601 NOWPH'O 
JNOW'l 

GO T0(603.604) . IFLIP 

603 IGET "IWRK1 
IPUT MWRK2 
GO TO 625 

604 I GET « IWRK2 
IPUT= IWRK1 

625 DO 609 I TEST«1 » NWAYS 

1 1 "NREADt ITEST) 
609 CALL DOPENt IWORK( II ) » I GET. I REP ♦ I BLKK ) 
C TEST FOR LAS J MERGE CYCLE. IF SO 
C OUTPUT FILE OF POINTERS TO IFILE 
IFtNPH-NWAYS) 620.620.621 
621 CALL D0PENU8UF.IPUT.IREP.IBLKK) 
GO TO 605 

620 CALL D0PEN(IBUF»IFPT.1.N*IBL0K) / £? 

THE : 
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C RETURN HERE FOR NEW MERGE PHASE. SET CONSTANTS 

605 IHIGH=0 

G IHIGH IS NOt OF WAYS THIS PHASE IS TO BE MERGED 

606 IHIGH'IHIGH+I 
IBASE=NOWPH*NPHAS 
I=IBASE+1 
IREC(IHIGH)»L 
ISW(IHIGH)»i 
II*NREAD< IHIGH) 

CALL DUSE( I WORK ( II)»I»1»1»KL) 
NTRAN ( IHI GH ) «KL+I I 
C ADVANCE TO NEXT PHASE* AND TEST FOR END OF CYCLE OR FILE 
NOWPH=NOWPH+l 

IF(KOUNT-IBASE-NPHAS) 633*633*634 
C NOT END OF FILE 

634 NRECL(IHI6H)=IBASE+NPHAS 
IF(IHIGH-NWAYS) 606*635*635 

C END OF FILE 

633 NRECL ( IHI GH ) sKOUNT 

635 CONTINUE 

C RETURN HERE FOR NEW MERGE GROUP 

629 I TAKE«0 

DO 618 ITEST=1»IHIGH 
C COMPARE KEYS* IF EITHER PHASE IS EXHAUSTED* THEN OTHER RECORD IS 
C USED. I TAKE IS BUFFER NO. IN WHICH RECORD TO BE PROCESSED IS FOUND 

I F ( I TAKE ) 623*613*623 

623 IF( ISW( ITEST)-2 ) 615*618*615 
613 IFMSW(ITEST)-2J 616.618*616 

616 ITAKE=ITEST 
GO TO 618 

615 I F ( IPTSK( KEYS » I KEY* I WORK » NTRAN (I TAKE ) *NTRAN < I TEST ) )-2)618 »616»616 
618 CONTINUE 

I F ( I TAKE ) 617*617*626 
C TRANSFER RECORD TO FORM NEW FILE 
626 I J a NTRAN ( I TAKE ) -1 

CALL DPUT(IBUF»JNOW»IWORK( IJ) ) 

JNOW«JNOW+l 
C GET NEW RECORD 

I»IREC( ITAKE)+1 

IREC(ITAKE)=I 

IF( I-NRECL< ITAKE) ) 630*630*631 

630 1 1 =NREAD ( I TAKE ) 

CALL DUSE( IWORK( 1 1 ! »I »1»1*KL) 
NTRAN U TAKE ) sKL+NREAD ( I TAKE ) 
GO TO 629 
C PHASE IS EXHAUSTED 

631 ISW(ITAKE)=2 
GO TO 629 

C THIS PHASE COMPLETE. TEST IF LAST PHASE 

617 IF(NOWPH-NPH) 605*624*624 

C THIS MERGE CYCLE COMPLETE. SET CONSTANTS FOR NEXT CYCLE 

624 NPHAS=NPHAS*NWAYS 

NPH S ( NPH+NWAYS-1 J /NWAYS 
IFLIP--2/IFLIP 
CALL DCLOSUBUF) 
C TEST FOR LAST CYCLE 

IF(NPH-l) 622*622*601 

no 



-27- 



PAGE 03 



622 RETURN 
END 

FEATURES SUPPORTED 
ONE WORD INTEGERS 

CORE REQUIREMENTS FOR MRGPH 
COMMON VARIABLES 72 PROGRAM 590 

END OF COMPILATION 



111 
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// FOR 

*ONE WORD INTEGERS 
*LIST SOURCE PROGRAM 

FUNCTION IPTSKfKEYS, I KEY , I GHST , KG 1 , KG2 ) 
C KEYS- ARRAY CONTAINING DEFINITION OF SORT KEYS 

C IKEY* NO OF KEYS 

C I GHST=ARRAY CONTAINING STRING OF SORT KEYS 

C KG1 =PO INTER TO MAJOR SORT KEY, FIRST RECORD 

C KG2 ^POINTER TO MAJOR SORT KEY iSECOND RECORD 

c output is i if first record is to be selected 

c 2 if second record is to be selected 

c if keys are identical* then original position is tested to 

c determine output 

DIMENSION KEYS (4*10) ,IGHST< 500) 

DIMENSION IP(2) »IQ(2) 
C DIMENSION IP(4),IQ(4) EXT 

EQUIVALENCE (P,IP(2)),(Q*IQ(2)> 
C EQU I VALENCE (Pf I Pi 3 ) ) » ( Q » 10 ( 3 ) ) EXT 

JG=KG1 

JG1=KG2 

DO 201 I K= 1 , I KE Y 
KEY I K=KE YS ( It IK) 
KEYTP=KEYI< 
IF(KEYIK) 215»2 16»216 

215 KE YTP=-KE YTP 

216 GO TO( 202,203,204,203) , K E Y T P 
C COMPARE INTEGER KEYS 

202 IGJG=IGHST( JG) 
I3JG1=IGHST ( JG1 ) 

IF ( IGJG) 210,211,211 

210 IF(IGJGl) 212*290,290 

211 IF(lGJGl) 299*212,212 

212 IF{ IGjG-IGjGl) 290,205,299 
205 JG=JG+1 

JG1=JG1+1 
GO TO 201 

C COMPARE HIGH PRECISION KEYS 

203 DO 209IX=1»2 

C 203 DO 209 I X= 1 , 3 EXT 

IP( IX) = IGHST( JG) 

IQ! IX)=IGHST( JG1) 

JG-JG+1 
209 JG1*JG1+1 

IF(<EYTP- 2) 214,214,213 
214 CALL SD( 3,P,Q) 

IF( INT(R) ) 290 , 201 ,299 

213 IF(P-Q) 290*201*299 

C COMPARE ALPHABETIC KEYS 

20* '<L = KEYS(4, I;<) 

CALL QCO^Pv I GHST i JG ) , 1 , IGHST( JGi ) , 1 ,KL, I R) 

IF(IR) 299,207,290 
207 JGlNC=KL+l ) /2 

JG=JG+JGI NC 

JG1=JG1+J5I \C 
201 CC\TIVJE 
C <EYS ARE IDENTICAL 

I F C<Gi-<G2 ) 291* 291 , 292 

290 I=;<EYI<) 29?»291»291 

291 IPTS<=1 

*ETU?N 112 
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299 I F ( KEY I <) 291»292 i292 
292 IPTSK=2 

RETURN 
END 

FEATURES SUPPORTED 
ONE WORD INTEGERS 

CORE REQUIREMENTS FOR IPTSK 
COMMON VARIABLES 22 PROGRAM 312 

END OF COMPILATION 
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/■/ FOR 

#ONE WORD INTEGERS 
♦LIST SOURCE PROGRAM 

SUBROUTINE DOPENt I BUF »N . J »L ) 
C THIS SUBROUTINE OPENS A FILE BUFFERtSETTING INITIAL VALUES TO 

C THE FILE CONTROL WORDS. 

C 

DIMENSION IBUF<325) 
C IBUF » NAME OF FILE BUFFER 

C N * FILE NUMBER 

C J s CORE RECORD LENGTH 

C L » NUMBER OF RECORDS IN BLOCK 

C 

IBUFU) = N 
IBUF(2) » J 
IBUFO) * L 

C 

C IBUFU) » FILE TYPE 

C *1 WHEN BLOCK HAS ONLY BEEN USED FOR TRANSFERRING A 

C RECORD FROM IBUF TO AN ARRAY (FOR GET OPERATIONS) 

C -.2 WHEN BLOCK HAS BEEN USED TO TRANSFER A RECORD FROM 

C AN ARRAY TO IBUF (FOR PUT OPERATIONS) 

C SET « 1 INITIALLY 

C 

IBUF(4) = 1 

C IBUF<5) = NUMBER OF FIRST RECORD IN BLOCK 

C 

C SET * INITIALLY 

C 

IBUF(5) * 

RETURN 

END 

FEATURES SUPPORTED 
ONE WORD INTEGERS 

CORE REQUIREMENTS FOR DOPEN 
COMMON VARIABLES 6 PROGRAM 50 

END OF COMPILATION 
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// FOR 

♦ONE WORD INTEGERS 
*LIST SOURCE PROGRAM 

SUBROUTINE DGET < I BUF»K» IA) 
C THIS SUBROUTINE TRANSFERS RECORD K OF A FILE TO ARRAY IA. 
C IF THE REQUIRED RECORD IS ALREADY RESIDENT IN THE BUFFER* IT IS 
C IMMEDIATELY TRANSFERRED 

C IF IT IS NOT IN THE BUFFER » THE BLOCK OF RECORDS IN THE BUFFER 

C IS STORED IF NECESSARY* AND THE CORRECT BLOCK OF RECORDS 

C OBTAINED FROM THE DISK* AFTER WHICH TRANSFER OF THE RECORD TAKES PLACE 

C 

DIMENSION IBUFC325) »IAUOO) 
C IBUF * NAME OF FILE BUFFER 

C K * RECORD TO CONTAIN ARRAY IA 

C IA REQUIRED ARRAY 

C 

CALL DUSE(IBUF.K.1»1*KL) 
C HERE TO TRANSFER RECORD FROM IBUF 
J- IBUF<2) 

DO 5 JJ a 1«J 

IA(JJ) = IBUF(KL) 
5 KL a KL + 1 
RETURN 
END 

FEATURES SUPPORTED 
ONE WORD INTEGERS 

CORE REQUIREMENTS FOR DGET 
COMMON VARIABLES 6 PROGRAM 62 

END OF COMPILATION 



ns 
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// FOR 

*ONE WORD INTEGERS 
*LIST SOURCE PROGRAM 

SUBROUTINE DPUT ( I BUF *K » I A) 
C THIS SUBROUTINE TRANSFERS AN ARRAY IA TO RECORD K OF A FILE. 
C IF THE REQUIRED BLOCK IS ALREADY RESIDENT IN THE BUFFER* THE ARRAY 
C IS IMMEDIATELY TRANSFERRED 

C IF IT IS NOT IN THE BUFFER » THE BLOCK IN THE BUFFER IS STORED 
C IF NECESSARY* AND THE REQUIRED BLOCK OBTAINED FROM THE DISK* 
C AFTER WHICH TRANSFER OF THE ARRAY TAKES PLACE* 
C THE CONTENTS OF IA ARE NOT WRITTEN ON THE DISK. 
C 

DIMENSION IBUF1 325) »IAU00> 
C I BUF = NAME OF FILE BUFFER 

C K RECORD TO CONTAIN ARRAY IA 

C IA REQUIRED ARRAY 

C 

CALL DUSE(IBUF*K»l f 2,KL) 
C HERE TO TRANSFER RECORD FROM IA 
J» IBUF<2) 
DO 5 JJ * 1»J 
IBUF(KL) * IA( JJ) 
5 KL 8 KL + 1 
RETURN 
END 

FEATURES SUPPORTED 
ONE WORD INTEGERS 

CORE REQUIREMENTS FOR DPUT 
COMMON VARIABLES 6 PROGRAM 62 

END OF COMPILATION 
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z£z 

// FOR 

*ONE WORD INTEGERS 
*LIST SOURCE PROGRAM 

SUBROUTINE DCLOS(IBUF) 

C 

C THIS SUBROUTINE CLOSES THE FILE 

C IF A BLOCK OF RECORDS REQUIRES TRANSFER TO THE DlSKi THE TRANSFER 

C IS MADE. 

DIMENSION IBUF<325) 

C 

C IBUF = NAME OF FILE BUFFER 

C 

KK = IBUF(4) 
GO TO (3.4) tKK 

3 RETURN 

4 N = IBUF(l) 

LL = (IBUF(2)*IBUF(3> ) + 5 

C 

C LL = NUMBER OF LAST WORD IN BLOCK 

C 

Kl = IBUF<5) 

L = MI NO ( 320» ( LL-5 ) J 

C 

C L FILE RECORD LENGTH 

C 

NREC ■ (LL + L - 6)/L 

C 

C NREC = NO OF FILE RECORDS IN A BLOCK 

C 

K3 =( (Kl/IBUFO) )*NRECi + 1 

C 

C K3 » RECORD NUMBER OF THE FIRST FILE RECORD IN THE BLOCK 

C CONTAINING RECORD K 

C 

WRITE(N'K3) (IBUF( I) *I =6»LU 

RETURN 

END 

FEATURES SUPPORTED 
ONE WORD INTEGERS 

CORE REQUIREMENTS FOR DCLOS 
COMMON VARIABLES 16 PROGRAM 116 

END OF COMPILATION 
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// FOR 

*ONE WORD INTEGERS 
*LIST SOURCE PROGRAM 

SUBROUTINE DUSE ( I BUF , K »M > KEY » KL> 

DIMENSION IBUF(325) 



C THIS SUBROUTINE GENERATES A POINTER TO ONE WORD OF A DISK 

C RECORD ♦ SO THAT WORD CAN BE REFERENCED IN A SUBSEQUENT 

C OPERATION 

C IF THE BLOCK CONTAINING THE REQUIRED RECORD IS ALREADY IN 

C THE BUFFER* THE POINTER IS GENERATED IMMEDIATELY 

< IF IT IS NOT IN THE BUFFER. THE BLOCK IN THE BUFFER IS 

C STORED IF NECESSARY* AND THE REQUIRED BLOCK OBTAINED 

C FROM THE DISK* AFTER WHICH GENERATION OF THE POINTER TAKES 

C PLACE 

C IBUF =NAME OF FILE BUFFER 

C K =RECORD REQU i RED 

C M =WORD REQUIRED 

C KEY =SWITCH TO INDICATE IF SUBSEQUENT USE OF POINTER WILL 

C CAUSE RECORD TO BE CHANGED • IF SO, KEY=2 ♦ IF NOT* KEY=1 

C KL =POINTER TO WORD REQUIRED 

C FIRST 5 WORDS OF IBUF ARE CONTROL WORDS 

C IBUF(1)= FILE NUMBER (N> 

C IBUF(2)= LOGICAL RECORD LENGTH (J) 

C IBUF(3)= NO. OF LOGICAL RECORDS IN A BLOCK <L) 

C IBUF(4)= FILE TYPE DEFINITION =1 INITIALLY 

C =2 WHEN BUFFER HAS BEEN MODIFIED 

C ' BY PUT OPERATIONS* AND HENCE IS DIFFERENT FROM DISK 

C I8UF(5)= NO. OF FIRST RECORD IN BLOCK =0 IF BUFFER HAS NOT 

C BEEN FILLED 

L=IBUF(3) 

Kl = ( <K~1)/L)*L+1 

C Kl -RECORD NO. OF FIRST LOGICAL RECORD IN THE BLOCK CONTAIN- 

C ING RECORD K 

J=IBUF(2) 

K2=IBUF(5) 

IF(K1-K2) 1,2*1 



1 N=IBUF(1) 
L2=J*L 

C L2 =NO. OF WORDS IN BLOCK 

L1=MIN0(?20,L2) 
C LI ^PHYSICAL RECORD LENGTH 

NREC = ( L2+L1-1 ) /LI 
C NREC=NO OF LOGICAL RECORDS IN PHYSICAL RECORD 

C -SAME AS BLOCKING FACTOR IF PHYSICAL RECORD LENGTH. LE. 320 

LL=L2+5 
KK=I8UF(4> 

C INSERT THE FOLLOWING STATEMENTS IF A TRACE ON SW 15 IS REQUIRED 

C THESE CAUSE THE VALUES OF ALL PARAMETERS TO BE PRINTED WHENEVER 

C A PHYSICAL RECORD IS TRANSFERRED TO OR FROM DISK 

C CALL DAT SW ( 15 » JJJ ) 

C IF(JJJ-l) 993,997,993 

C 997 WRITE (3,999) ( IBUF( I II ) , 1 1 1 = 1,5 ) ,K»M,KEY 
C 999 FORMAT ( ' « ,1015) 
C 99S CONTINUE 

GO TO( 3 ,4) ,KK 

C 

C HERE TO STORE BLOCK ON DISK 

C 

4 <3= (K2/L)*NREC+1 
C K3 =RECORD NO. OF THE FIRST LOGICAL RECORD IN THE BLOCK 

/7f 
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PAGE 

C CONTAINING RECORD K 

WRITE (N'K3) (IBUF( I) iI=6'.LL) 

C 

C HERE TO READ NEW DISK BLOCK 

3 K3= (Kl/L) *NREC+1 

READ ( N 1 K3 ) ( I 8UF ( I ) * 1 = 6 ♦ LL) 
IBUF(5)=K1 

C REQUIRED DISK BLOCK IS IN PUFFER 

2 KL = (K-Kl )*J+M+5 
IF(KEY-l) 6,6.5 
C HERE FOR PUT OPERATIONS 

5 IBUF(4)=2 

6 RETURN 
END 

FEATURES SUPPORTED 
ONE WORD INTEGERS 

CORE REQUIREMENTS FOR DUSE 
COMMON VARIABLES 16 PROGRAM 216 

END OF COMPILATION 



17? 
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// FOR 

*ONE WORD INTEGERS 
*LIST SOURCE PROGRAM 

FUNCTION MIN0( I »J) 

C 

C FUNCTION SUBPROGRAM TO CHOOSE THE SMALLEST VALUE 

C OF TWO INTEGERS. 

C 

IF< I )210»211,211 

210 IF< J)212»290,290 

211 IF< J)299»212,212 

212 IF< I-J)290t 290*299 
290 MINO = I 

RETURN 
299 MI NO = J 
RETURN 
END 

FEATURES SUPPORTED 
ONE WORD INTEGERS 

CORE REQUIREMENTS FOR MINO 
COMMON VARIABLES 2 PROGRAM 48 

END OF COMPILATION 
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// JOB SWAIN SORT-MERGE LISTING 

// * COMET AND IDEAL SUBROUTINES USED BY SORT-MERGE PROGRAM 
// ASM 

♦LIST SOURCE PROGRAM 









* 


THIS 




\J v. w r l r 




CUM r UU 1 U 








* 










CUMrUUAU 


0000 




1 ft AAA* 1 7 




CWT 

LIN I 




A^AU A 




COMP0030 






AAA 1 




QCC 
DOO 




1 




COMPOOh-O 


vUwi 


u 


A A 9 a 




C T V 


a 


C A\/Cf 1 

b AV tcr 1 


SAVE XR2 


COMP0050 






V 


9 a ^ r 




CTC 
O I O 




c Av/trc 
AV to 


C A V / C CTATllC 


COMP0060 


UUUJ 


u 1 


AAA AAA AA 
OOoUUUUU 




! A V 
LUX 


i A 


QCUMP 


LOAD XR2 WITH CALL&l 


C0MP0070 


u uus> 


A 

u 


ro ac 
C AO 3 




I A 

LD 


X2 


5 


LOAD ACC WITH RET PARA ADD 


COMP0080 


a a a a 


A 



n a *9 a 
uu 




C T A 




5T0R1&1 


STORE IN STORE PARA INST 


COMP0090 


UUU ( 


A 




caoq 




LD 


X2 





LOAD SC AREA ADD TO ACC 


COMP0100 


U UUo 


u 


1 A A 1 

1001 




SLA 


X 


1 


SHIFT LEFT ONE BIT 


COMP0110 


009 


A A 

ou 


AC OAAAA 1 

9680000 1 




S 


1 2 


1 


SUB COLUMN N0# SC# CHAR 


COMP0120 


000b 





Q A A f 

oQQC 




A 




TWO 


ADD TWO 


COMP0130 


a a a /■ 

OOOC 





A A ^ /. 




ST0 




SCRAD 


STORE INTO SCRAD 


COMP0140 




uu 


/"cftAAAA/. 
CqO UUUU&f 




i A 

LD 


I 2 




LOAD CHARACTER COUNT 


COMP0150 


A A AP 

UUUr 


A 

U 


A A O ^5 

UU a a 




C T A 

STO 




CHCNT 


STORE INTO CHCNT 


COMP0160 


U U 1 u 


A 

u 


r A 




f A 

LD 


X A 


2 


LOAD SECOND AREA mDDRESS 


COMP0170 


AA1 1 

U UI 1 


A 
U 


1 A A 1 




5LA 


v 
X 


1 


SHIFT LtFT ONc SIT 


COMP0180 


U U i A 


AA 

UU 


OAGAAAA^l 




c 


A A 


3 


oUB COL NO rROM ACC 


COMP0190 


AA1 A 

U U 1 


A 

u 


QAA2 

UU5 




A 

A 




T WU 


A AA T \tl A 

AUU TWO 


COMP0200 




A 

u 


7 9 AA 
( £ U O 




KA A V 

MUX 


X A 


O 


AAA C T A v O O 

A|^U p TO XR2 


COMP02 10 


f*A1 A 


A 

u 


A A 1 O 




C T Y 


A 


Kl 1 K N Cr 1 


SlOKt XK2 IN KLT INSTKt 


COMP0220 




AA 

uu 


A A A A A A A O 


i [NO i 


C T A 


L 


2 


o 1 UKt ACC INTO XKZ 


COMP0230 


HA 1 O 

UU 1 7 


A 

u 


C A 1 7 


LUUK 


I A 

LD 




r /" D A A 

5 LK AU 


LOAD SCRAD TO ACC 


COMPOZ^O 


A A 1 A 


"3 A 

30 


1 O 1 AAA A *3 




/"A I I 
CALL 




A ^ D A O 


GET FIELD ONE CHARACTER 


COMP0250 


r*m r 

UU 1 L 


A 
U 


AA 1 A 

uu 10 




c T A 




A T C M A 

A 1 EMP 


CTAOC /"Li TMTA A TCMD 

o 1 ORE CH iNiO ATEMP 


C0MP0 aoO 


uu 1 u 


UU 


r Ll AAA A A ^ 




t A 
LU 


i 

L 


/ A A A O 
/ U00 A 


(AAA YDO A f f* 

LUAU AKa I O ACC 


COMP0 270 


uu 1 r 


Q A 






r A t i 
CALL 




A f D A ca 


GET FIELD TWO CHAR 


/"Alii Pi^^O 

COMP028 


U Uc 1 


A 
U 


OA 1 1 




c 




ATCMD 

A t tnr 


oUDlKACt Ai tnr rKUM ACC 


COMrO 29 


u u a A 


A 1 
U 1 


Af"5AAA^ A 
*+CAUU UAA 




tier 
DoC 


L 


c T A 1 » 7 


QD A MTU T C MAT 7CTDA 

□ RANCH lr NOl Z.EKU 


/"All/I AAQAA 

COMPO^OO 




A 1 
1 


7/i ET C A A 1 1 

/ £f r r 003 1 




M A V 

MUX 


L 


SCRAD % -1 


DECREMENT SCRAD 


COMP0310 


A A A 


A 

U 


7 ETC 




M A V 

MUX 


X A 




□tCREMENT XR2 


/"All AA*3 O /\ 

COMP0320 


A A "7 

00a r 


A 1 

1 


*7A CCAA1 ^ 

f 4r r 003 2 




M A V 

MDX 


L 


CHCN 1 ♦ — 1 


ftC/*DCMCMT ru/*AlT 

DECKEMtNI CHCNT 


COMP0330 


A A *5 O 
00 A 9 


A 



7 A C C 




MUX 




1 AAA 

LOOP 


MAT 7 r pi a f~ r\ T r\ i r\A n 

NOT A.EROt GO TO LOOP 


^* Akl A A "5 A 

COMP03H-0 


002A 


01 


D400002C 


STORl 


STO 


L 


* 


STORE IN RETURN VARIABLE 


COMP0350 


002C 


01 


6600002E 


SAVE 


LDX 


L2 


# 


RESTORE XR2 


COMP0360 


002E 





2000 


SAVES 


LDS 


X 





RESTORE STATUS 


COMP0370 


002F 


01 


4C00003I 


RETRN 


BSC 


L 


* 


RETURN 


COMP0380 


0031 


1 


0032 


SCRAD 


DC 




* 




COMP0390 


0032 


1 


0033 


CHCNT 


DC 








COMP0400 


0033 


1 


0034 


ATEMP 


DC 




* 




COMPO^flO 


0018 






TWO 


ECU 




1NST&1 




COMP0420 


0034 








END 








COMP0430 



NO ERRORS IN ABOVE ASSEMBLY. 
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// ASM 

*LIST SOURCE PROGRAM 











TH I 5 


T e 


GoRAd 




GRAB0010 


















GRAB0020 


UUUU 












A("D A D 

QoKAB 




GRAB0030 


on ao 




AAA 1 


U UK Ab 


QCC 

Boo 




1 




GRAB0040 


UUUl 


U 


1 ool 




COT 

SKI 


X 


1 


DIVIDE BY 2 


GRAB0050 


0002 





P\ f\ A 

DOOZ 




STO 




LOADS 1 


STORE WORD ADD INTO LOAD 


GRAB0060 




A 


1 AQ1 




CI T 


X 


1 ' 


PUT REMAINDER INTO CARRY 


GRAB0070 


0004 


01 


C4000006 


LOAD 


to 


L 




LOAD WORK TO ACC 


GRAB0080 


0006 





4802 




BSC 




c 


GO TO MASK INST IF CARRY 


GRAB0090 


0007 





1808 




SRA 


X 


8 


RIGHT JUSTIFY CHARACTER 


GRAB0100 


0008 





E002 




AND 




MASK 


MASK EXTRA BITS 


GRAB0110 


0009 


01 


4C800000 




BSC 


I 


QGRAB 


RETURN 


GRAB0120 


000B 





00FF 


MASK 


DC 




/00FF 




GRAB0130 


oooc 








END 








GRA80140 



NO ERRORS IN ABOVE ASSEMBLY. 
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// ASM 
♦LIST 

0000 042621D5 



0000 0001 

0001 6915 

0002 01 65800000 
0004 00 CD800000 
0006 01 4C280011 
0008 01 4C08000C 
000A C010 
OOOB 7006 
OOOC 1090 
OOOD 4820 
OOOE 70FB 
OOOF COOC 

0010 7001 

0011 C008 

0012 00 D5800001 

0014 7102 

0015 690? 

0016 00 65000000 
0018 00 4C0000OO 
001A FFFF 
001B 0001 
001C 0000 
001E 



ENT DISGN 

*CALL DISGN(DBL I NT • I S 

* WHERE ISIGN IS RETURN 

*DBL INT BEING RESPECT 

DISGN BSS 1 

STX 1 INDX1&1 

LDX U DISGN 

LDD II 

BSC L NEG»Z& 

BSC L ZACC»& 

POS LD PONE 

MDX STORE 

ZACC SLT 16 

BSC Z 

MDX POS 

LD ZERO 

MDX STORE 

NEG LD NONE 

STORE STO II 1 

MDX 1 2 

STX 1 BACK&l 

INDX1 LDX Ll *-* 

BACK BSC L *-# 

NONE DC -1 

PONE DC +1 

ZERO DC 
END 



IGN) 

ED -l»0t»l DEPENDING UPON THE 
IVLY NEGATIVE»ZERO»PCSITIVE 
RETURN CALL & 1 HERE 



GET DOUBLE INTEGER 
BRANCH IF NEG ACCUM 
BRANCH IF ZERO ACCUM 
LOAD ISIGN WITH PLUS ONE 

SHIFT EXT TO ACC 
SKIP IF ZERO 



LOAD BRANCH BACK INSTRUCT 
RESTORE INDEX ONE 
BRANCH BACK TO MAIN PROG 



IDEAL961 
IDEAL962 
IDEAL963 
IDEAL964 
IDEAL965 
IDEAL966 
IDEAL967 
IDEAL968 
IDEAL969 
IDEAL970 
IDEAL971 
IDEAL972 
IDEAL973 
IDEAL974 
IDEAL975 
IDEAL976 
IDEAL977 
IDEAL978 
IDEAL979 
IDEAL980 
IDEAL981 
IDEAL982 
IDEAL983 
IDEAL984 
IDEAL985 
IDEAL986 
IDEAL987 
IDEAL988 
IDEAL989 



NO ERRORS IN ABOVE ASSEMBLY. 



MS 



// FOR IDEAL993 

*ONE-WORD INTEGERS IDEAL994 

*LIST ALL IDEAL995 

FUNCTION INT(DBLIN) IDEAL996 

C INT IS A FUNCTION WHICH TESTS THE SIGN OF A DBL INT WITH AN IF STATE IDEAL997 

C -1 IF MINUSiO IF 0»»1 IF POSITIVE IS RETURNED. IDEAL998 

C FUNCTION INT CALLS DISGN IDEAL999 
C SAMPLE I F ( I NT ( D IONE ) ) NEG STATEMENT » ZERO STATEMENT »POS STATEMENT NUMB IDFALQO& 

CALL DISGN(DBLIN» ISIGN) I DEALOOA 

INT=ISIGN IDEALOCB 

RETURN IDEALOOC 

END IDEALOOD 

VARIABLE ALLOCATIONS 
INT =0000 ISIGN=0002 

CALLED SUBPROGRAMS 
DISGN SUBIN 

CORE REQUIREMENTS FOR INT 
COMMON VARIABLES h PROGRAM 18 

END OF COMPILATION 



THE 



// ASM 
♦LIST 

0000 



22100000 ENT SD SUBROUTINE NAME 

*CALL SD <A>B»C> WHERE A=B-C 

♦DOUBLE INTEGERS HAVE STD PREC REAL VARIABLE NAMES 
♦IDEAL 1130 FORTRAN ERROR CODE IS /DEAF IN ACCUM. 
♦TO DISPLAY STATEMENT ALLOCATION ADDR IN ERROR* HIT 
♦ START » ACCUM HAS FORTRAN STATEMENT ALLOCATION ADDR. 
♦HIT START TO CONT I NUE . OUTPUT IS SET TO ZERO. 



0000 




0001 


SD 


BSS 




1 


SUBROUTINE ENTRY POINT 


0001 





690F 




STX 


1 


INDX1&1 




0002 





280F 




STS 




STATS 




0003 





2000 




LDS 




o 


I NIT IALI2E OVERFLOW 


0004 


01 


65800000 




LDX 


1 1 


SD 


CALLS1 ADDR IN INDEX ONE 


0006 


00 


C0800001 




LDD 


1 1 


1 


LOAD B OF A B-C 


0008 


00 


9D800002 




SD 


1 1 


2 


SUBTRACT C OP A B-C 


OOOA 


o 


4801 




BSC 




o 


SKIP TP OVERFLOW IS OFF 


OOOB 


o 


7009 




MDX 




TORI G 


GO TO IDFAL FRROR DISPLAY 


OOOC 


00 


D0800000 

W W \J \J V V/ 


OUT 


STD 


I I 
* X 


o 


MOVE TO A OF A=B~C 


OOOE 


o 


7 103 




MDX 


1 


3 




OOOF 




6 904 




STX 


X 


L? r> l %. FN sj X 




0010 


00 


65000000 


I NDX1 


LDX 


LI 


*— # 




0012 





2000 


STATS 


LDS 









0013 


00 


4C0000O0 


BACK 


BSC 


L 


*-# 




0015 


00 


74000032 


TOBIG 


MDX 


L 


50,0 




0017 





70FD 




MDX 




TOBIG 


INTERRUPT SERVICE LOOP 


0018 





C006 




LD 




HDEAF 


IDEAL FORTRAN ERROR CODE 


0019 





3000 




WAIT 






DISPLAY ERROR CODE IN ACC 


001A 





C0E5 




LD 




SD 


LOAD ENTRY ADDR » SUB CRG+2* 


001B 





9004 




S 




H01C4 


AND DISPLAY STATEMENT 


001C 





3000 




WAIT 






ALLOCATION ADDR IN ACCUM • 


0010 





10A0 




SLT 




32 


CLEAR TO OUTPUT ZERO VALUE 


001E 





70ED 




MDX 




OUT 




001F 





DEAF 


HDEAF 


DC 




/DEAF 


IDEAL FORTRAN ERROR CODE 


0020 





01C4 


H01C4 


DC 




/01C4 


DISKZ ORGIN +2 


0022 








END 









IDEAL769 
IDEAL770 
IDEAL771 
IDEAL772 
IDEAL773 
IDEAL774 
IDEAL775 
IDEAL776 
IDEAL777 
IDEAL778 
IDEAL779 
IDEAL780 
IDEAL781 
IDEAL782 
IDEAL783 
IDEAL764 
IDEAL785 
IDEAL786 
IDEAL787 
IDEAL788 
IDEAL789 
IDEAL790 
IDEAL791 
IDEAL792 
IDEAL793 
IDEAL794 
IDEAL795 
IDEAL796 
IDEAL797 
IDEAL793 
IDEAL799 
IDEAL800 
IDEAL801 
IDEAL802 
IDEAL803 
IDEAL804 



NO ERRORS IN ABOVE ASSEMBLY. 



THE 



-te- . 

// FOR 

♦ONE WORD INTEGERS 
*LIST SOURCE PROGRAM 

FUNCTION LARGEUREC) 
C THIS IS A SAMPLE SUBPROGRAM TO SATISFY THE CALL TO DUMMY FUNCTION 
C IUSE IN SUBROUTINE MRGPH 

C THE PURPOSE OF THIS FUNCTION SUBPROGRAM IS TO DETERMINE IF A 

C RECORD IS TO BE CONTAINED IN A SORT* ACCORDING TO RULES ESTABLISHED 

C BY THE USER. IN THIS EXAMPLE* A RECORD WILL BE OMITTED IF WORD 10 

C IS GREATER THAN 3 

C 

C IREC IS ARRAY CONTAINING RECORD 

C FUNCTION RETURNS 1 IF RECORD IS TO BE INCLUDED* 2 IF OMITTED 
DIMENSION I REC ( 32 > 
IF(IRECU0>-5 ) 1*1*2 

1 LARGE*1 
RETURN 

2 LARGE=2 
RETURN 
END 

FEATURES SUPPORTED 
ONE WORD INTEGERS 

CORE REQUIREMENTS FOR LARGE 
COMMON VARIABLES 2 PROGRAM 32 

END OF COMPILATION 



. , JB= - 

// * COMET AND IDEAL SUBROUTINES USED BY DEMONSTRATION PROGRAM 
// ASM 
♦LIST 
002D 



OOOO 



009E 



005D 



14044240 



ENT MADI SUBROUT 

»CALL MADI (INPUT ARRAY. FLD STAR 
♦CALL MADI MOVES AND CONVERTS Al 
♦AN 11 ZONE OVER RT MOST DIGIT N 
♦ALL ZONES EXCEpT RT MOST ARE ST 
♦DOUBLE* INTEGERS HAVE STD PREC R 



INE NAME 
T »FLD END »DBL INT) 
TO DBL WD INTEGER 
EGATIVE CONVERSION 
RIPPED OFF. 
EAL VARIABLE NAMES 



14062240 



"INE NAME 

?T»FLD ENDf INTEGER ) 
TO SIG WD INTEGER 
NEGATIVE CONVERSION 
fRlPPED OFF. 



14109040 



14889040 



ENT MASI SUBROUT 

♦ CALL MASI (INPUT ARRAY »FLD STAR 
♦CALL MASI MOVES AND CONVERTS Al 
♦AN 11 ZONE OVER RT MOST DIGIT Nl 
♦ALL ZONES EXCEPT RT MOST ARE STI 
* 

ENT MDIA SUBROUTINE NAME 

♦ CALL MDIA ( OUT ARRAY » START* END* DBL INT»EDIT CNTRL) 
♦CALL MDIA MOVES AND CONVERTS DBL WD INT TO Al 

♦ EDIT CNTRL 0»INSERTS 11 ZONE AT FLD END ♦ NO ZERO SU 
♦EDIT CNTRL -N>- AT END+ltZERO SUPP TO N RT DIGITS 
♦USE INT VARI FOR NEG CNTRL TO SAVE 5 WDS PER CALL 

♦ EDIT CNTRL +Nt-AT END+2 »N DECI PL*ZERO SUPP TO DEC 
♦EDIT CNTRL N GREATER THAN FIELD WIDTH»N IS +0 OR-0 
♦DOUBLE INTEGERS HAVE STD PREC REAL VARIABLE NAMES 

ENT MS I A SUBROUTINE NAME 

♦CALL MSIA (OUT ARRAY »START » END ♦ I NTEGER # EDI T CNTRL) 
♦CALL MSIA MOVES AND CONVERTS SIG WD INT TO Al 
♦EDIT CNTRL Of INSERTS 11 ZONE AT FLD END * NO ZERO SU 
♦EDIT CNTRL -N»- AT END+l»ZERO SUPP TO N RT DIGITS 
♦USE INT VARI FOR NEG CNTRL TO SAVE 5 WDS PER CALL 



+N»-AT END+2 *N DECI PLtZERO SUPP TO DEC 
N GREATER THAN FIELD WIDTH »N IS +0 OR-0 



♦EDIT CNTRL 
♦EDIT CNTRL 
# 

♦IDEAL 1130 FORTRAN ERROR CODE IS /DEAF IN ACCUM. 
♦TO DISPLAY STATEMENT ALLOCATION ADDR IN ERROR • HIT 
♦START»ACCUM HAS FORTRAN STATEMENT ALLOCATION ADDR. 
♦HIT START TO CONT I NUE. OUTPUT IS SET TO ZERO. 



0000 





0000 


MAS I DC 
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r Ar a | 1 

I UEAL19Z 


00R5 

\J \J U 


n 


COFP 








vj IN C 


cCT MFf^ATT WF Cti/TT/^U OM 


I DEAL193 




n 

u 






CTA 
O 1 U 




IN CUoW 


CCT MCf^ATTWC CU'TT/"U /AM 


t r\r ft I lrtA 

I DEAL194 


00R7 

w w U l 





1 0A0 

A v M v 




C 1 T 




DC 


f 1 PAD A/ m / m f CVT 
V.LLAK Act W CAT 


I DEAL195 


v U U O 




9 8 D7 




o V 






rAMDI TMPMT WAI IiF TM uaDi/ 


T Ar A ! 1 Cs 

I DbA L196 


00S9 

W V x 


01 


i N» V w u VJ Q > 




ocr 


T 
1 


NFr; 

IN C O 


OU 1 U ^ UI\V C.t\5 i UIM KUUIlj^it 


t rsr A 1 1 Q7 

I DEAL iy I 

T A C A 1 1 O Q 


DORR 

v w lj O 


n 


noon 

vj w W V 


TEST 


DC 






TCCT DFTI IDM 


T A r™ A 1 1 C\ A 

I DEAL199 


n o Br 


a 






OR 




HF040 


H/AC^ HT/CTT COD A 1 COD MAT 

MAoJn Ulgil rUK Ai rUKMAT 


I DEAL200 


oBD 


1 

V X 


D4 a ooo fA 




STO 


I 


FLDND 


OUT DMT DCfO\/CDCPi Pi T r T T 
UU I rU I KtV-UVcKbU U i o 1 i 


t Ar A 1 ^ 1 

1 DEA L20 1 


008F 


o 


C05F 

V- ^ c u 




LD 




NEGSW 


t OAO CWlTru r'OMATTTOW 
LUAU o«i Krl V-UNL?II1UN 


T rsr- A 1 O A 

1 DLAL2UZ 


ooco 


1 


4C0800CD 

t v y y u v >t u 




BSC 


L 


P0Sf& 


RPA\if"M TO one TP cui OPC 
or\MiNV»n 1 U rUj i r oW U(" r 


T A C A I 


0C2 


01 


f 4ft 000 FH 




LD 


I 


ARG5A 


POTT fHMTDAI DADAMCTPD 


T A C A I 9A/i 




1 

V X 






BSC 


L 


MINUS tZ 


R D A M ^" W TC MOT 11 70KiC rriOC 


T rsr A 1 O A C. 

I DtA L205 








* INSERT 11 ZONE OVER 


FIFIO FMO OlnlT 
r i ulu u / \ lv u * \j * i 


T O P A 1 A A 


00C6 


01 


C48000FA 




LD 


I 


FLDND 


r.pT FNH OTATT OF F T PI h 


T O P A 1 OAT 


ooca 




FOD? 




AND 




HDFFF 


IfNocKI li /-UfNu vviln Ului 1 


TArA | 5«fl 

i UhALtOo 


00C9 


01 


D48000EA 




STO 


I 


FLDND 


PUT DIGIT WITH 11 ZONE 


IDEAL209 


\> \J s. u 


a 


1010 


SW 


SLA 




16 


v»LCMt\ A<LV. 


T A P A 1 A 


oocc 


o 


D02 1 




STO 




NEGSW 


cct MFA C.U/TTTH TO 7FPO 




OOCD 


1 

\J X 


740 1 OO FA 


P0S 


MDX 


L 


FLDND tfrl 


TUT c tc MOW MFyT rOI liMW 
iniO lo !wW IN LA! V^UL-UrliN 


| AC a | 51 -3 




o l 

V X 


7/j.ppOOFQ 
i 't r ruuc" 




MDX 


L 


FLDWD t-1 


TUCCCT /"AI 1 IMMC ADC VCT TA f 

I ritot LULUr^No AKt Ytl 10 o 


T A C A » 9 1 *X 

\ DEAL^il 3 


a a P5 1 


U 


7 A A 1 
f U U X 




MDX 




AGAIN 


S^I H THIS Ir FLDWD IS ZtKO 


I DEAL214 


OOD? 

V V U' <c 





700? 

f V v £ 




MDX 




EDIT 




T A C A 1 OIK 


U U u' ^ 


O 1 


A f Q A A A Q R 


AGAIN 
* 


BSC 


I 


TEST 


AFT MFyT OTATT 


T A P A 1 t 
T A C A 1 O 1 "7 


o o a* 


O 1 

U JL 


^Z* fl A A A C A 


EDIT 


LD 


I 


ARG5A 


EDIT CONTROL PARAMETER 


I DEAL218 


r\ r\ r\ "i 

OD 7 


1 


4^1801 OA 




BSC 


L 


INDX1 f &- 


OMIT SUPP ZEROS IF ZERO 


IDEAL219 


n r\ aq 


a i 

U I 


f> r "t A A A C A 

4 L i UUU bU 




BSC 


L 


DEC»- 


NO DECI POINT 


IDEAL220 




U 


55 A A C 




A 




ZSCNT 


CALC LcFT ZERO MAX COUNT 


IDEAL221 


aa ft r 


A 1 
U 1 






BSC 


L 


SLZ t6Z 


N GT rLDWDfCNTRL IS -0 


T r\ r** A 1 A m 

IDEAL222 


UUP t 


A 

u 


A A A f 

U U u (, 




STO 




ZSCNT 


MAX LEFT ZERO SUPPRESS 


IDEAL223 


UU'Jr 


U 


/ U 1L 




MDX 




SLZ 


BRANCH TO SUPPRESS ZEROS 


IDEAL224 


AACA 

UULU 


U 




DEC 


STO 




FLDWD 


STORE WIDTH OF DElI PItLD 


IDEAL225 


n n P 1 


U 


f AAA 




LD 




ZSCNT 


CMTTDC C I CI A ^iTATU 

tfNiiKt rlbLD WlUIn 


I DEAL226 


OOF2 

V KJ L. £. 


A 


7 v V w 




S 




f-LDWD 


ct 'RTQ ATT ncr t u t r\T u 


T OF A 1 557 


OOF^ 




4 C 1 F F 




BSC 


L 


NORM,- 


rM AT FL OUfO . rMTP L TC frft 


T OF A t 55 


00E5 





C0B2 




LD 




ONE 


LOAD ONE 


IDEAL229 


00E6 





D002 




STO 




FLDWD 


SET FLDWD TO ONE FOR SIGN 


LDEAL230 


C0E7 





700A 




MDX 




SIGN 


BRANCH TO SIGN 


IDEAL231 


GOES 





0000 


FLDST 


DC 







FIELD START ADDR 


IDEAL232 


00E9 





0000 


FLDWD 


DC 







FIELD WIDTH 


IDEAL233 


00EA 





0000 


F LDND 


DC 







FIELD END ADDR 


IDEAL234 


00EB 





0000 


ZSCNT 


DC 







ZERO SUPPRESS MAX COUNT 


IDEAL235 



-47- 

PAGE 5 



o 



OOEC 





0000 


ARG4A 


DC 







ARGUMENT 4 ADDRESS 


IDEAL236 


OOED 





0000 


ARG5A 


DC 







ARGUMENT 5 VALUE 


IDEAL237 


EE 





0000 


NEGSW 
# 


DC 









IDEAL238 
IDEAL239 








* SHIFT RIGHT 


TO FIELD 


END PLUS TWO FOR DEC I POINT 


IDEAL240 


OOEF 





D0F8 


NORM 


STO 




2SCNT 


MAX LEFT ZERO COUNT 


IDEAL241 


OOFO 


01 


740100E9 




MDX 


L 


FLDWD » 1 


ADJUST FOR SIGN POSITION 


IDEAL242 


00F2 


00 


65000000 


SIGN 


LDX 


LI 


*-# 


LOAD SIGN ADDRESS 


IDEAL243 


O0F4 





C100 


NEXT 


LD 


1 





LOAD CHARACTER 


IDEAL244 


00F5 





D1FF 




STO 


1 


-1 


SHIFT RIGHT ONE COLUMN 


IDEAL245 


00F6 





7101 




MDX 


1 


&1 


INCREMENT INDEX FOR NEXT 


IDEAL246 


00F7 


01 


74FF00E9 




MDX 


L 


FLDWD »-l 


DECREMENT DECI WIDTH CNTR 


IDEAL247 


00F9 





70FA 




MDX 




NEXT 


SKIP IF LAST DECI POSITION 


IDEAL248 


OOFA 





C01A 




LD 




H4B40 


LOAD DECIMAL POINT 


IDEAL249 


C0F3 





D1FF 




STO 


1 


-1 


INSERT DEC I MEL POINT 


IDEAL250 








* SUPPRESS 


LEADING ZEROS IN OUTPUT FIELD PER COUNT 


IDEAL251 


OOFC 


01 


74FF00EA 


SLZ 


MDX 


L 


FLDND »-l 


this is next column right 


IDEAL252 


OOFE 


01 


C48000EA 




LD 


I 


FLDND 


LOAD LEFT CHARACTER 


IDEAL253 


0100 


01 


E400005A 




AND 


L 


HOFOO 


ISOLATE DIGIT 


IDEAL254 


0102 


01 


4C20010A 




BSC 


i_ 


1NDX1 >Z 


BRANCH OUT IF NOT ZERO 


IDEAL255 


0104 





COOF 




LD 




H4040 


LOAD BLANK TO REPLACE ZERO 


IDEAL256 


0105 


01 


D48000EA 




STO 


I 


FLDND 


OUTPUT BLANK TO FIELD 


IDEAL257 


0107 


01 


74FF00EB 




MDX 


L 


ZSCNT »-l 


MAX ZERO SUPP SKIP EXIT 


IDEAL253 


0109 





70F2 




MDX 




SLZ 


SKIP THIS IF MAX CNT ZERO 


IDEAL259 


010A 


00 


65000000 


INDX1 


LDX 


LI 


*-* 


RESTORE INDEX REG ONE 


IDEAL260 


010C 





2000 


STATS 


LDS 




#-* 


RESTORE STATUS 


IDEAL261 


010D 


00 


4C000000 


BACK 


BSC 


L 


*-* 


BRANCH BACK TO FORTRAN PRO 


IDEAL262 








* INSERT MINUS SIGN AT 


FIELD END PLUS ONE 


IDEAL263 


G IGr 





C006 


M i iNUS 


LD 




Ho 040 


MINUS SIGN 


i 0EAL26^ 


0110 


01 


D4800QF3 




STO 


I 


SIGN&1 


AT FIELD END PLUS ONE 


IDEAL265 


0112 


01 


4COO0OCB 




3SC 


L 


SW 




IDEAL266 


0114 





4040 


H4040 


DC 




/4040 


BLANK 


IDEAL267 


0115 





4B40 


H4B40 


DC 




/4B40 


PERIOD 


IDEAL268 


0116 





6040 


H6040 
* 


DC 




/6040 


DASH 


IDEAL269 
IDEAL270 


0117 


00 


74000032 


TOSlG 


MDX 


L 


50»0 




IDEAL271 


0119 





70FD 




MDX 




TOBIG 


INTERRUPT SERVICE LOOP 


IDEAL272 


011A 





C009 




LD 




HDEAF 


IDEAL FORTRAN ERROR CODE 


IDEAL273 


0118 





3000 




WAIT 






DISPLAY ERROR CODE IN ACCU 


IDEAL274 


one 


01 


C4000074 




LD 


L 


ARGMT&l 


DISPLAY ENTRY ADDRESS 


IDEAL275 


OUE 





9004 




S 




H01C4 


AND DISPLAY STATEMENT 


IDEAL276 


OUF 





3000 




WAIT 






ALLOCATION ADDR IN ACCUM. 


IDEAL277 


0120 





10A0 




SLT 




32 


CLEAR TO OUTPUT ZERO INTEG 


IDEAL278 


0121 


01 


4C000056 




BSC 


L 


OUT 




IDEAL279 


0123 





01C4 


H01C4 


DC 




/01C4 


DISKZ ORGIN +2 


IDEAL280 


0124 





DEAF 


HDEAF 


DC 




/DEAF 


IDEAL FORTRAN ERROR CODE 


IDEAL281 


0126 








END 








IDEAL282 



NO ERRORS IN ABOVE ASSEMBLY. 



c 
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// ASM 

*LIST SOURCE PROGRAM 











THIS- 


IS 


QPASS 




PASS0010 








# 










PASS0020 


0000 




185C18A2 




ENT 




QPASS 




PASS0030 


0000 




0001 


QPASS 


BSS 




1 




PASS0040 


0001 





6A20 




STX 


2 


SAVE&l 


SAVE XR2 


PASS0050 


0002 


01 


66800000 




LDX 


12 


QPASS 


LOAD XR2 WITH CALL&l 


PASS0060 


0004 





C200 




LD 


X2 





LOAD SOURCE AREA TO ACC 


PASS0070 


0005 





1001 




SLA 


X 


1 


SHIFT LEFT ONE BIT 


PASS0080 


0006 


00 


96800001 




S 


12 


1 


SUB COLUMN NO OF SC FIELD 


PASS0090 


0008 





801E 




A 




TWO 


ADD TWO 


PASS0100 


0009 





D01B 




STO 




SCRAD 


STORE ACC INTO SCRAD 


PASS0110 


OOOA 


00 


C6800004 




LD 


12 


4 


LOAD CHARACTER COUNT TO AC 


PASS0120 


OOOC 





D019 




STO 




CHCNT 


STORE IN CHCNT 


PASS0130 


OOOD 





C202 




LD 


X2 


2 


LOAD DEST FIELD ADD TO ACC 


PASS0140 


OOOE 





1001 




SLA 


X 


1 


SHIFT LEFT ONE BIT 


PASS0150 


OOOF 


00 


96800003 




S 


12 


3 


SUB DEST CH NO FROM ACC 


PASS0160 


0011 





8015 




A 




TWO 


ADD TWO 


PASS0170 


0012 





7205 




MDX 


X2 


5 


ADD 5 TO XR2 


PASS0180 


0013 





6A10 




STX 


2 


RETRN&l 


STORE IN RETURN INSTR 


PASS0190 


OOU 


00 


04000002 




STO 


L 


/0002 


STORE ACC IN XR2 


PASS0200 


0016 





COOE 


LOOP 


LD 




SCRAD 


LOAD SCRAD TO ACC 


PASS0210 


001? 


30 


181D9042 




CALL 




QGRAB 


GET SOURCE CHARACTER 


PASS0220 


0019 


30 


18888925 




CALL 




QSHUV 


PUT IN DESTINATION FIELD 


PASS0230 


001B 





72FF 




MDX 


X2 


-1 


DECREMENT XR2 


PASS0240 


001C 


01 


74FF0025 




MDX 


L 


SCRAD. -1 


DECREMENT SCRAD 


PASS0250 


OOlE 


01 


74FF0026 




MDX 


L 


CHCNT »-l 


DECREMENT CHCNT 


PASS0260 


0020 





70F5 




MDX 




LOOP 


NOT ZERO • GO TO LOOP 


PASS0270 


0021 


01 


66000023 


SAVE 


LDX 


L2 


* 


RESTORE XR2 


PASS0280 


0023 


01 


4C000025 


RETRN 


BSC 


L 


* 


RETURN 


PASS0290 


0025 


1 


0026 


SCRAD 


DC 




* 




PASS0300 


0026 


1 


0027 


CHCNT 


DC 




* 




PASS0310 


0027 





0002 


TWO 


DC 




2 




PASS0320 


0028 








END 








PASS0330 



NO ERRORS IN ABOVE ASSEMBLY. 
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// ASM 

*LIST SOURCE PROGRAM 









* 
* 


THIS 


IS 


QSHUV 


0000 




18888925 




ENT 




QSHUV 


0000 




0001 


QSHUV 


BSS 




1 


0001 





D013 




STO 




TEMP 


0002 


00 


C4000002 




LD 


L 


2 


0004 





1881 




SRT 


X 


1 


0005 





D005 




STO 




AND&l 


0006 





1091 




SLT 


X 


17 


0007 





COOF 




LD 




MASK 


0008 





4802 




BSC 




C 


0009 





1808 




SRA 


X 


8 


OOOA 


01 


E400000C 


AND 


AND 


L 


* 


OOOC 





0009 




STO 




TEMPI 


0000 





C007 




LD 




TEMP 


OOOE 





4302 




BSC 




C 


OOOF 





1008 




SLA 


X 


8 


0010 





E805 




OR 




TEMPI 


0011 


01 


D480000B 




STO 


I 


AND&l 


0013 


01 


4C800000 




BSC 


I 


QSHUV 


0015 





0000 


TEMP 


DC 







0016 





0000 


TEMPI 


DC 







0017 





FFOO 


MASK 


DC 




/FFOO 


0018 








END 







STORE CHARACTER INTO TEMP 
LOAD XR2 TO ACC 
DIVIDE BY 2 

STORE WORD ADD IN MAS< INS 

MOVE REMAINDER INTO CARRY 

LOAD MASK TO ACC 

SKIP IF CARRY OFF 

SHIFT RIGHT IF CARR ON 

MASK DESTINATION WORD 

STORE INTO TEMPI 

LOAD CHARACTER TO ACC 

GO TO COMBINE CHAR IF CARY 

SHIFT LEFT IF CARRY OFF 

COMBINE CHARACTERS 

STORE INTO DESTINATION 

RETURN 



SHUV0010 
SHUV0020 
SHUV0030 
SHUV0040 
SHUV0050 
SHUV0060 
SHUV0070 
SHUV0080 
SHUV0090 
SHUV0100 
SHUV0110 
SHUV0120 
SHUV0130 
SHUV0140 
SHUV0150 
SHUV0160 
SHUV0170 
SHUV0180 
SHUV0190 
SHUV0200 
SHUV02I0 
SHUV0220 
SHUV0230 
SHUV0240 



NO ERRORS IN ABOVE ASSEMBLY^ 



4P\ 



© 
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// JOB T *SE10 42192 .1 SWAIN CALL ME 

// FOR 

* IOCS (TYPEWRITER* 1132 PR INTER »D ISK ) 
*ONE WORD INTEGERS 
*LIST SOURCE PROGRAM 

C DEMONSTRATE PMERG BY SORTING 1000 RECORDS OF 32 WORDS 
C USE 5 SORT KEYS i OCCUPYING 8 WORDS 
C MAJOR KEY IS WORD 6» INTEGER 

C SECOND KEY IS WORDS U AND 13> TREAT AS DOUBLE WORD INTEGER 

C (SIGN AND HIGH-ORDER BITS IN WORD 14* LOW ORDER BITS WORD 13) 

C THIRD KEY IS WORD 21 » TREAT AS 2 ALPHABETIC CHARACTERS 

C FOURTH KEY STARTS IN WORD 16» REAL 

C (SIGN AND HIGH-ORDER BITS IN WORD 16 

C LOW ORDER BITS AND EXPONENT IN WORD 15) 

C MINOR KEY IS WORDS 30 THRU 32 TREAT As 3 ALPHABETIC CHARACTERS* 
C STARTING FROM RIGHT CHARACTER OF WORD 30 

EXTERNAL LARGE 

C LARGE IS NAME OF PROGRAM TO DETERMINE IF RECORD IS TO BE 
C INCLUDED IN SORT 

DIMENSION IREC(32) 

DIMENSION KEYS! 4*5 ) » I WORK ( 1850) »IBUF(325) 
DIMENSION AREC(3) 
DIMENSION NAME(25)»I0UT(11> 

EQUIVALENCE (AREC( 1 ) iIREC(165 ) » (D0UB» IREC ( 14) ) 

DEFINE FILE 1 < 1 01 >320 »U » 1 1 ) 

DEFINE FILE 2 < 30.320 »U » I 2 > 

DEFINE FILE 3(30*320 »U #13) 

DEFINE FILE 4 (4 »320 »U » 14 ) 
C FILE 1 IS FILE TO BE SORTED. 
C FILES 2 AND 3 ARE WORK FILES 

C FILE 4 IS OUTPUT. CONTAINS POINTERS TO INDICATE PROCESSING ORDER 

C AS DETERMINED BY SORT KEY INFORMATION 

C 

C GENERATE 1010 RECORDS Op RANDOM NUMBERS 

C PMERG WILL EXAMINE LAST 1000 OF THESE TO SELECT THOSE TO BE 
C INCLUDED IN SORT ♦ AnD THEN SORT THOSE INCLUDED 

CALL DOPEN(IBUF»1»32»10) 

K=31525 

L=899 

IX=1000 

IK = 5 

IB = 10 

IL=IB+!X-1 

C CREATE ALPHABETIC CHARACTERS IN NAME* ALL VALID PRINTER CHARACTERS 
C ARE INCLUDED 

NAME(1)=16459 

NAME<2)=19790 

NAME(3)=20571 

NAME(4)=23645 

NAME(5)=24673 

NAME(6)=27517 

NAME(7)=32449 

NAME(8>=-15677 

NAME<9>=-15163 

NAME (10) =-14649 

NAME ( 11 ) =-14135 

NAME(12)*-11822 

NAME(13)=-11308 

NAME(14)=-10794 



-51- 



PAGE 02 

NAME(15)=-10280 

NAME(16)=-9758 

NAME(17)=-7196 

NAME ( 18 ) =-6682 

NAME(l9)=-6l68 

NAME(20)=-5648 

NAME(21>=-3598 

NAME (22) =-3084 

NAME(23)=-2570 

NAME(24)=-2056 

NAME(25)=-1792 
C STORE RANDOM INTEGER IN RANGE -9 TO +9 IN WORDS 1-14 

DO 1 1 = 1 » I L 

DO 2 J=l»14 

K=K*L 
2 IREC( J)=K/3277 
C STORE RANDOM REAL NUMBER IN RANGE -10 TO +10 IN WORDS 15-20 

DO 5 J=l »3 

K=K*L 

5 AREC(J)=FLOAT(K)/3277. 

C STORE RANDOM ALPHABETIC CHARACTER IN WORDS 21-32 
DO 6 J=l»24 
K=K*L 

M-K/1311+25 

6 CALL QPASS(NAME»M*IREC(21) *J»1) 
1 CALL DPUT(IBUF»I»IREC) 

CALL DCLOS(IBUF) 

C CREATE KEYS TABLE* TO INDICATE LOCATION AND TYPE OF SORT KEYS 
C MAJOR KEY IS INTEGER* WORD 6 

KEYS<1»1)=1 

KEYS(2»1)=6 

C SECOND KEY IS HIGH PRECISION INTEGER* HIGH-ORDER PART IN WORD 14 
C SORT INTO DESCENDING ORDER BY THIS KEY 

KEYS(l»2)--2 

KEYS(2>2 > = 14 

C THIRD KEY IS ALPHABETIC* FIRST CHARACTER WORD 21 COL It 2 CHARACTERS 

KEYS<1»3)=3 

KEYS<2,3)=21 

KEYS(3>3 )=1 

KEYS(4»3)=2 
C FOURTH KEY IS REAL* STARTS IN WORD 16 

KEYSU,4)=4 

KEYS(2,4)=16 

C FIFTH KEY IS ALPHABETIC* FIRST CHARACTER WORD- 3 COL 2* 3 CHARACTERS 
KEYSU»5)=3 
KEYS<2»5)=30 
KEYSI3»5)=2 
KEYS(4»5)=3 

C 

C PERFORM SORT-MERGE 
WRITE<1*102) 

102 FORMAT (• START SORT-MERGE' J 

CALL PMERG(1,32*IB,IX .KEYS . I K , I WORK » 18 50 » I BUF » 10 . 2 ♦ 3 » 4 » 
SLARGE iKOUNT ) 
WRlTEdt 103)KOUNT 

103 FORMAT ("END SORT-MERGE • ♦ 16 * ' RECORDS INCLUDED') 

C 

C LIST FIRST 10 RECORDS IN SORTED FILE 



TH 



PAGE 03 




CALL DOPEN( I8UF»1 »32»10) 
CALL DOPEN( IW0RK>4 ♦ 1,320 ) 
DO 4 1=1*10 

CALL D6ET ( I WORK » I »IPT> 

WRITE(3»101)IPT 
101 FORMAT (• RECORD N0.SI5) 

CALL DGET ( IBUF» IPT» IREO 

CALL QPASS(NAME»l»I0UT*2l»l) 

CALL MDIAUOUTtl»10»DOUBi-l) 
4 WRITE(3»104) ( I R EC ( J ) , J=l , 1 2 > »IOUT,AREC, < I REC { J ) , J=2 1 ♦ 32 ) 
10/+ FORMAT ( ' • »12I3»11A1»1X.3F8.4i1X»12A2) 

STOP 

END 



FEATURES SUPPORTED 
ONE WORD INTEGERS 
IOCS 

CORE REQUIREMENTS FOR 
COMMON VARIABLES 2324 PROGRAM 674 

END OF COMPILATION 



c 



THE 
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// XEQ L 1 

*LOCAL»SRTPH»MRGPH 

FILES ALLOCATION 



1 0432 

2 0497 

3 04B5 

4 04D3 



0065 
001E 
00 IE 
0004 



STORAGE ALLOCATION 



R 47 0010 (HEX) WORDS AVAILABLE 



CALL TRANSFER VECTOR 



01 SON 
QCOMP 
I NT 
SO 

QSHUV 

QGRAB 

MINO 

IPTSK 

DUSE 

MDIA 

DGET 

LARGE 

PMERG 

DCLOS 

DPUT 

P A S S 

DOPEN 

MRGPH 

SRTPH 



1C66 
1C32 
1BBA 
1B94 
1B7C 
1B70 
1A78 
1940 
1355 
178C 
16B1 
168D 
1638 
15C6 
1576 
1546 
1498 

1D25 LOCAL 
1CF8 LOCAL 



LI BF TRANSFER VECTOR 



FSUB 

SDRED 

SDCOM 

SDIX 

SDWRT 

FARC 

NORM 

EBCTB 

GETAD 

I F I X 

PAUSE 

SUBIN 

STOP 

SIOAF 

SI OA I 

SIOIX 

SIOI 

SCOMP 

SWRT 

FSTOX 

FDIV 



1BCC 
0D9E 
0DC2 
0D94 
ODEC 
1B4E 
1B24 
1B21 
1AE0 
1AB4 
1AA8 
1820 
1814 
OFEF 
OFFC 
1071 
0FF7 
OFDF 
0FD6 
145A 
14F4 



/?7 



_ THE 



FL0A1 i*E6 

SUBSC 14C8 
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PROFESSIONAL PROGRAMMERS AND ANALYSTS: 
PROBLEMS IN PERFORMANCE EVALUATION * 

By: Arthur S. Gloster II 

Oak Ridge Associated Universities is a nonprofit cor- 
poration engaged in research and educational activities 
located in Oak Ridge, Tennessee. The primary function of the 
corporation's data processing center is to apply electronic 
data processing techniques, where feasible, to research and 
administrative projects. The center contains 27 employees 
of which 13 are analyst/programmers. The center is divided 
into three groups: 1) scientific applications consisting 
of 6 personnel and a group leader, 2) commercial applications 
consisting of 5 personnel and a group leader, and 3) operations 
section consisting of a supervisor and 10 other employees. 
Oak Ridge Associated Universities has on site an IBM 180 
disk/tape system which is utilized by approximately 40% of 
the programming personnel. Approximately 6 0% of the personnel 
use IBM 36 0-50, 36 0-75 and CDC equipment located in the area. 
The analysis and programming function comprise a significant 
portion of the operating costs of the ORAU data processing 
center. 

After discussion with personnel from other installations , 
we found that there are no reliable standards by which costs 
can be calculated in advance, schedules established, and the 
performance of personnel evaluated. Although the methods we 
useu to establish schedules and costs are subjective and 
arbitrary, they in no way approach the accuracy of the methods 
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developed in the hardware area. For example, IBM has estab- 
lished rates for EAM equipment and has even produced a slide 
rule to use for estimating job times. 

A means of evaluating the professional analyst/programmer's 
job and a means of evaluating his effectiveness is highly 
desirable but rarely accomplished. Such means would be helpful 
predictors in determining the staff needed for a particular 
application or a data processing installation. We have found 
that records of intangibles, such as the time for the appli- 
cation analysis and problem definition, flow charting, coding, 
debugging, checkout, and finally documentation would have to 
be maintained continuously to have a base for predicting 
analyst /programmer costs and for personnel evaluation. In 
predicting costs of computer programs and evaluation, we would 
like to be able to have a magic number representing the proper 
number of analysts or programmers that could be applied to a 
given situation and for our center as a whole, but we found 
this to be impractical because we were measuring intangibles 
by subjective means. We found that attempting to save expenses 
by minimizing or restricting the availability of professional 
personnel caused equipment to be used ineffectively. The more 
the programmer is annoyed with accounting for his time and the 
more detailed the account for nonproductive time, the less 
apt he will be in cooperating in a program that keeps up with 
all of the various functions he performs. 
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Programming personnel at ORAU are engaged in numerous 
types of jobs; therefore , standards of work evaluation 
could not effectively reflect the variety of tasks they 
encounter. One programmer may be responsible for coding X 
number of instructions with relatively small amounts of logic 
development, while another programmer may be responsible 
for extensive logic development with relatively few instruc- 
tions. Thus, it becomes difficult to measure the amount 
of work required on each program, and the total work effort 
performed by a programmer cannot be assessed in standards 
of comparison with another programmer. 

At ORAU, we believe that the group leader of either the 
scientific section or the commercial section, depending on 
the particular area, should look at the problem in advance 
and then meet with the data processing manager to establish 
reasonable target dates for each of the previously-mentioned 
phases on the basis of the nature of the problem and on their 
past experience. The manager or group leader must have a 
detailed knowledge of the problem under study because it is 
his responsibility to prepare the cost estimate" and schedule. 
He must keep up with the allocation of funds and judge progress 
of the application. After giving several methods of job 
measurement trial, we have found that there is no substitute 
for experience in the area of predicting costs, measuring 
work, and evaluating programming personnel. Programmers 
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respect a supervisor who gives them a job and can tell them 
what performance is expected. The supervisor is also respected 
by his staff if he remembers that good supervision is the 
least supervision needed to get the job done. 
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*From Oak Ridge Associated Universities, Oak Ridge, Tennessee, 
under contract with the United States Atomic Energy Commission. 



Programmer Evaluation in U. S. Reduction Co. 

5. A • l^csk 

U. S. Reduction Co. is a producer of secondary aluminum alloys. Annual 
sales are over $60, 000, 000. There are approximately 900 employees. 
Corporate headquarters and one plant are located in East Chicago, Indiana. 
There are four other plants in four other states. 

Data-processing- services employees number six. In addition to a manager 
and assistant manager, there are two programmers, one operator and one 
key-puncher. In addition to these individuals, two other company employees 
are closely related; one functions ae a senior systems analyst, the second 
as a special project researcher who does his own programming. Finally, 
use has been made of two outside programmers on a contract or hourly basis. 

U. S. Reduction Co. uses two IBM 1130 Systems and some time on System 
360 /Models 20 and 30. An expanded 1130 configuration has been ordered. 

Methods of evaluation of programmer- effectiveness are based on subjective 
criteria, augmented by certain measurable phenomena. These include: 

a. Demonstrated dedication to task and cooperation during its fulfill- 
ment. 

b. Speed of accomplishment of assigned tasks. 

c. Feedback from users serviced by applications programmed by the 
programmer in question. 

d. Feedback from IBM personnel dealing with the programmer on 
technical matters. 

e. Extent and clarity of program documentation and general ease of 
impl em e nta t i o n . 

f . Infrequency of undefined error halts, accuracy of output, and speed 
of job execution. 

g. Personal evaluation by the programmer during the semi-annual 
salary review interview. 

h. In all of the above full recourse must be made to comparisons with 
the evaluator's personal experience as a programmer himself and 
with other programmers he has known. 
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PROGRAMMER EVALUATION 



Whenever the subject of Programmer Evaluation comes up in 
conversation, at meetings, and as the topic for panel discussion, I 
have the feeling that the participants are looking for easy answers. 
As an IBMer who has been in this business for a long time, I'll have 
to disappoint you if you expect me to give you an algorithm for 
judging the work that programmers do; because I don f t believe one 
ever will exist. It's easy to understand that in a profession that's only 
20 years old, in which the technology is in its infancy, in which 
40% or 50% of the people working in it probably have been working 
in it for about two years, in which an operating system which was 
a new concept in 1962 is old-hat in 1967, in which an experienced 
professional is ancient if he's been in the business ten years, and 
in which a manager is highly experienced if he has five years of 
management --it's easy to understand that most of us don't really 
know what to expect of the practitioners of this peculiar craft 
called programming. I'm disturbed by the idea some people seem 
to have that there may be a magic formula and some sort of 
mechanical procedure that produces an evaluation automatically 
without anyone's effort and judgment going into the process. You 
know, programmers are a clever lot; and if someone comes up 
with such a scheme, they'll find a way to beat it. 

The evaluation of the work of professionals is just not an easy task. 
It's especially difficult in a profession that's as young as ours. To 
do the job properly requires a lot of experience, a lot of skill, 
and especially it requires a lot of energy on the part of the manager. 
It also requires an understanding of a company's philosophy --a 
knowledge of what the company expects to accomplish by evaluating 
its people, and a knowledge of its standards. I think, also, that 
there is an opportunity now to improve the case for professionalism 
in programming. In an activity that's so new, ~ which has been 
entered by so many people so recently --in which the demand for 
practitioners far exceeds the supply --it comes as no surprise that 
advancement has been a matter of expediency more often than we 
care to admit. This only works to the detriment of the profession. 
We expect the number of programmers and analysts to double in the 
next four or five years, and we expect it to triple in ten. It's time 
to take stock. The opportunity won't last forever. 
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As I have said, the evaluation of the professional's performance on 
the job is really very difficult. It's a continuing problem one with 
no pat solution, only guidelines. Now one of the guidelines I'm going 
to speak about later on is knowing what the job is. And this applies to 
the first line manager as well. This manager must know that 
evaluation is his job and he, himself, will be measured on how well 
it's done. This is something that's not well understood by new, 
young managers, and I think the reason lies partly in today's 
pressure environment and partly in the way we choose managers. 
Many of us say that the programmer lives in a state of constant 
crisis. That may be true, but I don't think it's a characteristic that 
applies only to the life a programmer leads. I think if you will look 
at any production -oriented business — and I mean by that any 
activity in which you produce a product - - 1 think you'll find the same 
kind of perpetual crisis, or continuing pressure situation throughout 
the business world and industry today. Requirements are always 
changing, technology is constantly changing, and invention is made 
according to schedule. This means management is generally facing 
new technical problems every day. Combining this with the 
explosive growth that has taken place in the programming field, it's 
easy to understand the tendency to choose as a new manager the 
person in the group who has been technically most competent. 
Unfortunately, this doesn't mean that our new manager is the person 
most likely to succeed as a manager of people. Technical 
competence is, of course, a most necessary attribute of a manager, 
but I believe that in the long run the person who is really well 
oriented to the people who work for him will produce much more than 
the purely technically-oriented manager. The situation, of course, 
tends to be self -perpetuating. The new manager probably learns 
more from his manager than from anyone else. But the second line 
manager, himself, is so busy with the problems of meeting 
schedules and changing requirements that he is not likely to take the 
time to tutor his new subordinate in the personnel aspects of the job. 
Moreover, the second line manager probably lived in the same 
environment when he first became a manager and learned very little 
of this aspect of the job from his second line manager. Now this is a 
pretty vicious cycle, but it can be broken. Breaking it depends upon 
management in general realizing the value of doing the job properly. 
Just plain common sense tells us that there can be a real payoff. 

In order to become a really top notch manager, a person must have 
considerable insight which usually comes only after very extensive 
experience -- job insight and insight into people — what they're 
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capable of and what motivates them. In lieu of this extensive 
experience, the problem is how can we do a job which in some 
sense can be considered competent? Well, one thing we can do is 
attempt to give our managers better education in the form of 
instruction by his manager, and education in terms of formal 
training. I think most companies probably do a pretty good job of 
training new managers in various administrative aspects of their job, 
such as a knowledge of company policies, what procedures to follow, 
when it's necessary to requisition supplies, how to fill out the forms 
necessary to give a man a raise, and so on. But although most 
companies have forms to be used and to be filled out before and after 
an appraisal and counseling interview is held, since the evaluation 
process is so judgmental in nature, it's very difficult to tell anyone 
how to make the decisions necessary so that he can fill in the forms. 
My firm belief is that you learn this only by trying, by reviewing 
your decisions with your own manager and by trying again. And, of 
course, it's always extremely useful for a new first line manager to 
talk it over with other first line managers who have had more 
experience than he. At best, the only specific instructions that can be 
given can only be in the form of guidelines; and we will discuss a 
number of guidelines later. 

Let's take a look, now, at the reasons for evaluating our people. In 
IBM if we ask why we evaluate programmers, the answer is easy to 
understand. And I think our reasons are pretty much the same as 
yours. Evaluation really has a triple payoff for the company, for 
the manager, and for the programmers. 

If we look at the process from the company's viewpoint there are 
three important reasons. First, we want to improve our products 
and our services by finding an optimal deployment of our human 
resources. Second, we want to be certain that the salaries we pay 
are equable throughout all of our programming activities. And third, 
something that isn't often considered, IBM's attitude toward its 
programmers and toward the profession in general is bound to have a 
major impact on all programmers. So we feel that learning to do the 
job properly is a challenge and an opportunity to help the profession. 

If we look at evaluation from the manager 1 s viewpoint, the reasons 
are similar but more specific. First of all, the manager has to find 
the people most capable of doing the job he needs done. This means 
he must find the best way to utilize the people he has — and then he 
must measure them against his requirements. If he is really a good 
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manager (and he, himself, will be evaluated on this attribute), he 
will look beyond the immediate requirements of his own project and 
will decide whether or not some of his people can contribute more 
somewhere else. Secondly, since the responsibility for salary 
recommendations lies with the first line manager, and since 
increases are given for merit, the manager must decide who merits 
a raise, what the amount should b,e, and when the increase should 
be given. Finally, the manager must continually strive to improve 
the performance of the people who work for him. This means he 
must evaluate, he must instruct, and he must encourage his people. 
This is his opportunity to contribute to the profession. 

The third part of the evaluation payoff comes when the programmer is 
told openly and honestly what the manager thinks of the programmer's 
work. All of us want answers to a lot of questions — our morale 
depends on them. How do I stand? 1 How good was the job I did? 
Where am I going? Will the jobs I do continue to be interesting — to 
be challenging? Even if the answers to the questions are not what the 
programmer hopes for, his morale will be high if there is no 
subterfuge on the manager 1 s part. It's amazing how hard people will 
work if criticism is constructive. And it's surprising how much they 
will learn if they are given timely instruction. 

Now let's try to define some guidelines that will help us realize the 
benefits of a good evaluation program. The guidelines I shall 
propose are really a large number of questions that have to be asked 
and answered on a continuing basis. They will take quite a bit of the 
manager's time, skill, and energy to answer in any responsible 
fashion. And this is one reason why I constantly preach that a 
manager shouldn't have more than about eight programmers reporting 
to him six would be better. 

We are trying to evaluate programmers in terms of their present 
performance and their potential for future assignments. We'll start 
with present performance. 

First and foremost, I think, it's necessary to know what the job is 
that you expect the man to do. It's just as important that the man 
know the job you expect him to do. Once there is agreement on what 
the job is, I think half the battle is won. Moreover, one of the 
factors that one must use in the evaluation is the level of detail 
necessary in describings the job; and this must take into account the 
programmer's experience and position level. 
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Now it must be possible to measure how well the job is done. In 
order to do this it follows that some quantifying "job parameters' 1 
must be agreed upon. By job parameters I mean things such as the 
length of time necessary to complete the program, some indication 
of the size of the program, some indication of the performance 
expected of the program when complete, and some statement of the 
functional capability expected of the program. Remember, of course, 
that it may not be possible to state such parameters when the program 
is first conceived; and so the job assignment may very well be to 
study the proposed program and arrive at such parameters. 

Now depending upon the length of time needed to complete the 
program, it may be necessary to state some parameters that will act 
as checkpoints. After all, it's easy enough to keep track of a 
programmer who's working on a 1-week assignment, but it may be 
extremely difficult to keep track of the work a programmer does when 
his assignment takes him 2 or 3 months or more. In the latter case, 
it may be necessary to block out the job into sub -jobs, each of which 
has some sort of a time checkpoint and appropriate functional 
specifications, and so on. Checkpoints generally call for a review. 
This, of course, can be a very informal thing or it can be quite a 
formal undertaking if several programmers are involved in projects 
which culminate in a common checkpoint. But these checkpoints are 
necessary not only to see that the project progresses properly but 
also in terms of constant evaluation of the people doing the work. 
Once the job is complete, of course, the other half of the battle 
begins; and that is the assessment of whether or not the job was 
completed as expected. It's not difficult to know whether a person 
completed the job according to the required schedule or not; but if he 
didn't, what are the circumstances surrounding this? Was he 
permitted to do the job without interference? Were the specifications 
changed during the middle of the job? Does this program interface 
with other programs that changed and, therefore, required this 
program to be changed? 

Again, it's easy to measure the size of the finished program against 
the agreed-upon size. But if the program is too large, we have to 
ask whether the circumstances are extenuating or not. Was the 
projected size based upon knowledge of similar routines which had 
been done before for other machines or other circumstances? 
Should there have been a direct carry-over from the previous 
program to this? If this program is really a brand new program, 
was the amount of work underestimated? Were additional functional 
capabilities included in the program beyond the functional 
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specifications? Again, is the size of the finished program 
considerably less than projected when the job was first described? 
If so, is anything missing? Or was it just easier than we expected? 
Or did we discover new programming techniques? Similarly, was 
the job completed ahead of time? If so, was the estimate over- 
conservative? And if so was that the manager's fault or the 
programmer's fault? 

How we measure the performance of the program is probably one of 
the most difficult questions we could ask, particularly if the program 
has any magnitude. But at least we can compare the performance to 
other programs with similar functional specifications if such 
programs exist. And the likelihood is that they do. Does this 
program perform better or worse than the old program? In either 
case, why? 

Finally, in regard to functional specifications, does the completed 
program really have all the functional capabilities specified? If not, 
why is some capability missing? Was the feasibility of such a 
capability not proved? Or was it something not understood by the 
programmer in the first place? Again, if there is more functional 
capability in the program than asked for, what did we pay for this 
additional capability? Did we get it free in terms of schedule, size 01 
program, and performance? Probably not. If not, was the price 
worth paying? One begins to see that these are not easy questions to 
answer. And, therefore, it should be obvious that when I said 
evaluation was a difficult and time-consuming job, I really meant it. 

Once the initial assessment in terms of job parameters is made, we 
have to undertake an additional evaluation which is probably even 
more difficult. What is the quality of the work? We have already 
addressed most of the external aspects of quality; that is, whether or 
not the program met its size, performance, and functional 
specifications. One other external aspect is the correctness of the 
program. How well has this program been debugged? Of course, if 
the program came in on time, this means that it was debugged on 
time. Whether it came in on time or not, a good manager will ask 
what are the nature of the errors that did turn up? What was the 
debugging plan? Did the debugging plan take all reasonable 
contingencies into consideration? And I guess, finally, would a 
better debugging plan have produced the desired results in a shorter 
period of time? 
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Of course, to answer these questions, the manager must be pretty 
familiar with the written code. As a matter of fact, I don't know any 
way to judge the internal quality of a program without becoming 
thoroughly familiar with the program itself. This, of course, implies, 
too, that a manager can only make a quality judgment based on his 
own experience. Another factor regarding the internal quality of a 
program is the quality of the remarks that document the program. Are 
these remarks succinct and to the point? Do they appear where they 
are needed and not where they are redundant? Another factor one 
must look at is does the program use proven techniques, or is it 
innovative? I think that nine times out of ten the use of proven 
techniques will get the desired result with much less heartache than 
will innovation. This is not to say there is no place for innovation 
because there is. Again, though, it f s a judgmental factor as to when 
one should be innovative. Finally, is the program elegant? Now how 
do you answer that one? Well, I suppose you look for simplicity; you 
look for coding techniques that save time, or produce more function, 
and that are well documented; and you ask whether the job is 
workmanlike. Are all the steps there, do they lead logically from 
one to another to arrive at the desired result in the shortest possible 
time ? An elegant program to me is one which is characterized by 
simplicity, lucidity, novelty, and good workmanship. 

Before I talk about potential for future assignments, I would like to 
pause a moment and look back over what I've said. At this point the 
manager has evaluated a programmer's work with respect to a 
particular job assignment; that is, he has determined whether the 
job came in on time, that it met functional, performance, and size 
specifications, and that it was of a certain quality. So now the 
manager should be able to answer two questions. First of all 
does the programmer meet the requirements for this job? If the 
answer is yes, then the second question must be -- can he do a 
better job and is there something more challenging for him to do? 
If the answer to the first question was no, if the 30b requirements 
were not met, then the manager must ask why not? And here he 
must make a real value judgment was the programmer over his 
head, or was he not working up to his capabilities? If he was over 
his head, can he be taught? Or should he go elsewhere? And 
probably the most difficult question if he was not working up to 
his capabilities, what are the chances that he will next time? If the 
chances are poor, the manager has a real problem. If there were 
extenuating personal circumstances or job-related circumstances, 
what can the manager do to help alleviate these? Finally, if there 



are personal problems, the manager had best stay out. If there 
are job -oriented problems, then the manager has a responsibility to 
try to correct the situation. 

Now let's look at the potential for the future. I'm going to assume 
that the man being evaluated has performed satisfactorily in his 
present assignment and that the assignment has been challenging. 
Otherwise, he has either not met the job requirements or has not 
shown any potential for promotion or added responsibility. But if 
his last performance has been acceptable, then we have to look to the 
future. First, I guess, we would ask how broad is the man's 
experience? And here we get into the old argument of whether a 
person should be a generalist or a specialist. The argument, of 
course, is that the specialist can produce a given program without 
having to reinvent the wheel. My concern is that our people have 
specialized without having been exposed to the broad basic 
fundamentals of programming as a whole. This, of course, is due to 
the nature of the rapid growth in programming, but it doesn't really 
excuse the situation. There is no question that this is an age of 
specialization, but specialization usually comes after extensive 
schooling in the broad fundamentals of the discipline. Specialization 
without a broad base to start from is really a pretty unhealthy 
situation. Here again is one of the opportunities that we have to 
improve the profession as a whole. And I really don't think we will 
be in good shape until the colleges and universities have developed 
well-rounded curricula in the computing sciences. Whenever 
possible, I think it's best to attempt to give our programmer some 
breadth of experience. 

Directly related with the question of how broad this man's 
experience is is the question how up to date is his technical 
knowledge? It's very easy for a man who has spent one or two years 
in a high pressure project to forget some of the experiences he had 
in previous projects. This, again, I think is due to the lack of a 
well-rounded initial education. If a man has a good base to begin 
with, he is less likely to completely forget what he has learned in an 
area he is not working in currently than if he has had only brief 
experiences in several different areas. Several people have 
suggested that at least part of the evaluation of a programmer be 
based upon a well-defined skills inventory. I suspect this is a 
rather difficult thing to construct, but it would be interesting to try. 
Remember, however, that this is not a panacea. It is only one of the 
tools that a manager must draw upon in evaluating one of his people. 
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Another characteristic we must try to evaluate is the man's 
technical foresight. How well does he foresee problems? Is he 
able to avoid the problems, or bring them to his management's 
attention early enough so that appropriate steps may be taken? Or 
does he evade the problems? Another attribute to consider is the 
man's problem -solving ability. This is always considered a key 
characteristic in the search for new programming talent. But how 
do we evaluate it? That's a very difficult thing to do without seeing 
him in operation. I expect, though, that watching the man in action 
gives a pretty good clue as to his ability to face problems by himself. 
And I think that's what we really mean. Does he solve the problem 
himself, or does he need to come to his management for help? A 
corollary question, does he come to his management for help when 
this is really necessary when the problem is outside of his range 
of experience? This leads directly to another characteristic, his 
judgment and decision -making ability. When the man is faced with 
alternatives, how often does he make the right choice? Can he in 
some fashion characterize the probabilities of success for the various 
alternatives? Is his judgment good -- does he make the right choice 
more often than not? 

The next area that we have to evaluate is the man's self-knowledge 
and his self -improvement activities. Does he understand his own 
limitations and his own talents? What is he doing to remove his 
limitations? Does he have his own plan, or must he be led? 
Remember that one way to improve one's capabilities and one's 
experiences is to constantly seek out new and broadening assignments. 
Does he read the literature of the field? Does he go to seminars? 
Does he go to meetings and bring back new ideas? Just how wide are 
his horizons? 

One of my pet peeves is the man who cannot communicate. Over and 
over again I've run into people who cannot write clearly, cannot speak 
clearly, and it's questionable as to how clearly they think. Although 
many programmers tend to be reserved and introverted, this is not 
true of all of them by any means. You might think if a programming 
shop or a programming specialty is a one-man operation in a 
particular installation, that it doesn't matter whether he can 
communicate or not. Well, nothing could be farther from the truth. 
If a programmer is to be successful in working in a team, he has got 
to be able to communicate both orally and in writing. Particularly, if 
a man is going to be an analyst of any sort, he should be able to 
communicate clearly with the people he has to deal with in attempting 
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to offer his services. So many times I've heard people who are not 
computer -oriented say that they would love to use the facilities of a 
computing center but they can't communicate with the analysts or the 
programmers. I think it's up to us to see that we, as programmers, 
are able to provide the right kind of information and to show the 
uninitiated how our services might be used. And it does no good to 
do this with a chip on the shoulder. So one of the major questions 
that I would ask is how well does the programmer communicate with 
his peers, his management, and with novices and the uninitiated? I 
carit emphasize strongly enough that I think the man who can't 
communicate, although he may be a fine programmer, is a man 
whose usefulness is highly specialized. 

Now let's consider what the programmer has done for the profession. 
Has he had an opportunity to make a contribution? What has he done 
within his company? Has he made any technical advances? Does he 
make suggestions within his own area timely suggestions for new 
programs? Does he see ways to simplify what's being done? Does 
he attend seminars? Does he write papers and make presentations? 
Does he go to computer meetings? What kind of contacts has he 
made? Has he met people whom he can stimulate intellectually and 
who can stimulate him intellectually? If he makes presentations, 
does he have something to say? How well is he respected within his 
own area, within his company, and by others in the profession outside 
of his company? I grant you that with so many people who are so new 
in the profession, not a lot have been able to make contributions. 
But I think again that it's our responsibility to stimulate our people 
into contributing. And not on a haphazard basis either. They need 
the guidance of those of us who have had experience. 

Now I want to discuss one other item that needs consideration both 
from the standpoint of present performance and potential for future 
assignments. This is one which most of us don't like to talk about too 
much, but it's something that's extremely important in this day and 
age. That's the question of cost control. Primarily, we have to ask 
how well our programmer has utilized machine time. This, of 
course, tias in with his success in debugging. But it's of utmost 
importance today because it's a major contributing factor to the cost 
of production of programs. The main question is could the man have 
used less machine time to debug his program? Three other cost 
factors are the use of supplies, the use of travel, and the use of 
overtime. Although the question of overtime is more likely 
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something that a manager will be judged on, unless a project has 
been directed to go into overtime, a person 1 s ability to do his work 
during regular hours is one that should be looked at. I guess if 
overtime is necessary in a particular instance, we have to go back 
to the question of whether or not the job was completed on time. Of 
course, there are always extenuating circumstances such as illness, 
absence for other personal reasons, etc. 

I'm certain that all of you can think of many other questions that one 
might ask in the evaluation of a programmer. I don't claim to be all 
inclusive — I f m just trying to suggest the general areas that I think 
are important to evaluate. Of course, remember also that most of 
the questions must be answered in light of the position a man holds. 
We ask much less of the newcomer than we do of the oldtimer . We 
ask considerably less of the junior programmer than we do of the 
senior programmer. As a matter of fact, this implies that position 
descriptions exist and that they 1 re well written, that they're under- 
stood, and that they 1 re generally applicable to the work being done. 
Remember also that good position descriptions will address many of 
the areas in which I have asked questions and hopefully will give 
some guidance as to what is expected of the person in the particular 
job. A good position description can be one of the manager's valuable 
aids for evaluation. Good position descriptions also should address 
promotability. I think there should be well defined criteria for 
promotion with indications as to what criteria may be sidestepped and 
under what circumstances. I'm certain most of you have seen cases 
where a programmer was not promoted in one department, was then 
transferred, and shortly thereafter promoted in another department. 
At the very least this suggests that the two areas were not looking at 
the same criteria for promotion. This is an extremely unfortunate 
situation and one that 1 s hard to handle . 

I guess I can't tell you what kind of answers you need to these 
questions to be able to say that a programmer is outstanding or merely 
meets requirements or always exceeds requirements or does a very 
poor job. Standards are going to vary from company to company. I 
think most of us will find that we don't even have standards within 
our own company. So we really have a job here in providing the 
standards applicable to our own situation. There is a lot of work 
involved; but, as I indicated earlier, we think it's a challenge and an 
opportunity. 
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Let's remember another thing, too. The manager who looks 
constantly at all the attributes and all the characteristics of the 
Drogrammer he is evaluating and who instructs him and who 
criticizes him constructively all the time is a paragon that just 
doesn't exist. If most of us can look at many of these questions 
on a relatively constant basis and can do our best to instruct and 
criticize constructively, then I think that we're doing quite a 
remarkable job. And I guess in closing I finally want to remind 
you that when you try to answer many of these questions and when 
you try to set up your own standards, don't forget the man who is 
given an impossible task. We need a hero medal — second class. 
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Thanks for inviting me to your meeting and to the very fine luncheon this noon, 

I must say it has been a real pleasure and I have been tremendously impressed 
by the pace of your program and the am 7 Itious goals which you have set for 
yourselves here in Cincinnati. 

I am sure you must know how greatly IBM values the working relationship which 
has evolved over the years between our people and your organization. There is 
absolutely no substitute for the direct insight into your individual and collective 
problems which can be gained 'through this relationship. 

With the complexity of hardware, software and applications increasing at such 
astounding rates, we need your advice, counsel and constructive criticism 
badly. It provides us with a fundamental reference point from which to develop 
our plans and focus our resources on areas that best meet your needs. 
Incidentally, you may find it interesting that two particular subjects are coming 
through loud and clear. 

The first concerns the general area of our method of providing you with manuals 
and technical information. 

The second question concerns the various types and levels of supporting education 
required from IBM. 

I can assure you that we are addressing these two particular points with 
exceptional urgency as a direct result of the emphasis which this organization 
has placed on them. 

As I observe the many contributions your organization has made to its members, 
I am especially impressed with the quality and quantity of the Type IV Library. 
Today it contains over 700 programs written by members of the COMMON 
Organization. Your massive contribution to the 1620 Library has been of 
significant value to your own members, to IBM and to the state of the art as a 
whole. This experience should indicate the value of now turning your efforts 
to the equally productive Models 20, 1130, and 1800 to build a similar library 
for your own use of these systems. 

There are an awful lot of people these days sitting back and watching us in the 
computing industry. In fact, it has become a popular pastime to comment 
upon the effects of computing and automation on our society. 
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We, as IBM'ers, are especially interested in these commentaries. And I, for 
one, have been particularly concerned about one dimension of the industry 
which has been getting a lot of attention lately and I would like to spend the 
remaining time I have with you this noon talking about it. 

It has to do with the broad conclusion reached by a number of contemporary 
writers that automation and, more specifically, the computer constitute a major 
threat to the individual in our society. These writers point out specific instances 
where automation has unfavorably impacted the individual and then conclude 
categorically that these instances constitute a trend at the end of which is the 
comolete extinction of the individual in tomorrow's society. And, that we are 
destined to live in a faceless world with standardized values, regimented 
routines of life and mechanical modes of thought. More often than not, the 
computer is used as a symbol of that threat. 

I guess the whole thought stream got started as early as the mid ' 30 's with 
Aldous Huxley's "Brave New World". He pictured a technological society 
living in doped-up bliss under the watchful eye of a powerful tyrant. 

George Orwell depicted a similar grim scene of life under the ever-present 
electronic eye and ear of Big Brother. 

Today, writers such as Galbraith and Vance Packard are further soothsayers 
of the impending doom. Packard, in his book "The Naked Society" , says, 
"In the Western World today, swirling forces are causing whole populations 
willy-nilly to change their attitudes, ideals and behavior patterns". One of 
these forces he describes as "the electronic eyes, ears and memories". 

Supplementing these more renown writers are self-appointed investigators 
who use the public media to broadcast sensational exposes of how man today 
is losing the battle with automation. 

Most often they take some form of the theme of a man's personal identity being 
replaced by a number of holes in a punched card. 

They usually conclude that these mysterious forces are somehow thrusting men 
pell mell toward a conformative life of grim, mushy blahdom overseen by the 
sterile surveillance of the master machine. 

Before we rush to take a position for or against these observations, let's pause 
to define what it really is that we're afraid of. 

Psychologists tell us that each of us has a compelling need to establish his own 
personal worth, and that a key part of that need is identity as an individual. 
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I would define individuality as the desire of each man in our society to direct his 
own destiny. To set himself apart from the rest of society as a person who has 
unique tastes, thoughts and goals. He needs to have the prerogative of living as 
he wants and developing himself toward ends which he has defined. He doesn't 
want society or governments or employers or any other group (much less machines) 
to plan and manage his life for him. He wants the freedom of choice which allows 
him to select the kind of food, clothing, shelter, education, employment and 
leisure which suits him and his family best. The uniqueness of this pattern which 
he chooses identifies him as an individual and establishes his identity. 

What we : re afraid of then is that our society is becoming so organized that the 
above choices will not be ours, but will be provided according to some kind of 
plan. We're afraid that those in seats of power are developing some plan based 
upon statistical models and norms describing what each of us should want and 
need, 

We ! re afraid of the similarity of our housing, the food in the supermarkets, the 
clothes on the racks, the cars on the lots, the standardization of our educations — 
and the impersonal treatment by service organizations. 

In short, we f re afraid because the patterns we see developing across our society 
appear to be a challenge to our compelling need for individuality and personal 
identity. 

I must join in these observations and agree that many of these trends are, in 
fact, in motion. I can't agree, however, with the conclusion that automation, 
or computers, have been the cause of these trends nor do they constitute the 
current threat. 

Computers and their use are a result rather than a cause. A result of the very 
same basic force which is responsible for the threat to our individuality. That 
force stems from the historic insistence on the part of the "have nots" to join 
the "haves". Whether they be the poor or the emerging nation reaching for food 
and shelter, or the middle class stretching for higher living standards, they 
represent a constantly growing demand for a higher standard of living for more 
people. 

Man's success in meeting these demands, many times with the help of machines 
but sometimes without, has resulted in a society geared to volume rather than to 
individual needs. 

Now, whether we look at consumer products, human rights, education or personal 
services, this demand and response goes through three stages . 
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In the first stage — the benefit is only available to a select portion of the 
population. They are the "haves". They have an exclusive, if you will, on the 
benefit and it uniquely distinguishes them from their fellows. 

Stage two is a natural follow-on — the "have nots" demand the benefit and 
society's ingenuity to supply it is motivated. The result is that more and more 
"have nots" become "haves". But in doing so, the benefit loses a big ingredient « 
its exclusiveness and thus, its Individuality to the possessor. 

The third stage then is, or should be at least, an attempt to stylize or expand 
the benefit into unique subsets so that even after mass production and distribution, 
the benefit regains what it lost in stage iwo an appeal to the individual. 

Let me illustrate with some examples — 

In the early 1900 l s every automobile was designed specially for the buyer and 
then was hand made. This was the first stage. You can observe several things 
about it 

1. Only a few could be produced. 

2. Only a very small percent of the population could afford them. 

3 # Ownership of custom automobiles was certainly a prestigious 
and individualistic thing. 

Within a few years, however, pressure developed from those who did not have 
this luxury and we enter stage two « as a response to the demand. . .Henry 
Ford f s ingenuity created the technique of mass production and he cranked out 
huge quantities or one model. ... . . . the Model "A" at a price that more people 

could afford, and in the color they wanted as long as it was black. 

At this point, Ford satisfied the demand of the masses but he lost something in 
the process. He sacrificed the idea of a "custom" car designed and built 
specifically for an individual. The customer no longer had a car which 
represented his individual tastes and distinguished him from his neighbors. 
All had black Model "A's". 

But the story doesn't end here — rather it moves to a third stage and this is 
the key point. Today we can select an automobile from an impressive array 
of models, styles, color variations, and features which suit our individual 
tastes. In fact, that myriad of options and combinations is so great that every 
single car produced by Ford alone this year cuuld have been different from all 
others without going outside the standard features. 
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What brought on stage three? What accomplished this return to the custom car? 
A demand for individuality responded to by more sophisticated techniques of 
automation, aided in no small way, by the computer. 

Let's take another example to illustrate the point education. 

Stage one in the good old days the right to education was enjoyed only by 

the few, primarily royalty — in fact, as late as 1900, only 94,000 people in the 
United States graduated from high school. 

Today we consider education to be the birth right of every man, woman, and 
child — not just royalty. 

The result is the phenomenon realized in stage two — a high school education is 
a standard for the majority of our population and over a half million students 
are receiving college degrees each year. 

However, companion with this has been the depersonalized multiversity with 
campuses swarming with 20 to 30, 000 students. 

Overcrowded classrooms - where an instructor addresses a 
hall with upwards of 2 to 300 students 

and 

. Standardized curricula - where the pace of instruction and the 
content is geared to the average rather than to the individual. 

We readily see that in our attempt to satiate the demand, we ! ve already sacrificed 
the small classroom environment, the tailored pace of instruction, the personal 
guidance and touch of the teacher, and to a great degree, the ability of the 
individual student to pursue courses of study which are to his particular interest. 

Interestingly enough, in this example one can't even associate the move to the 
second stage with automation. For we accomplished both the response to the 
demand of the many and the loss of individuality without it. 

Stage three is still in its infancy. Significant developments are already on the 
scene in the form of computer aided instruction. A system is now available 
and in use which allows a student with his own visual display terminal to learn 

with the computer in a conversational mode the process is personalized 

to the extent that the material is presented and dealt with at the learning rate 
of the student. The human touch is preserved by the teacher who, upon being 
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relieved of the mechanics of presenting volumes of material, has time to devote 
herself to that student who is having problems or needs counseling 

These techniques show promise of moving education solidly into stage three. A 
stage which satisfies the demand for higher education for more and more people, 
and yet preserves the integrity of the individuals. 

I myself have explored many other examples and I know each of you could come 
up with many' of your own. But these two suffice to illustrate my premise. Let 
me review. .... 

First, there are today, trends in our society which are a continuing threat to 
each of us as we pursue our personal identity and individuality. 

Second, these trends do not stem from the use of automation or the computer, 

but rather are a by-product of man's organized response to the steadily increasing 

demand of the many for the benefits enjoyed by the few. 

And finally, the computer has demonstrated its capability to contribute to the 
development of the last stage of these trends the pursuit of our individuality. 

The advance of technology and automation cannot, and should not, be stopped 
for it is not the adversary of the individual but the ally. 

So I would say to you as members of this organization as key participants 

in the field of automation we must be prepared to proceed with confidence 

for there is no shame in progress our efforts are not a betrayal of ourselves, 
but rather an expansion of our opportunity. 

And this point must be made to our critics. 

In fact, you might want to think about adding this one to the objectives of your 
group. 

I ! d like to thank you again for the opportunity of joining with you today and wish 
all of you a very successful conclusion to your meeting. 
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SESSION NUMBER T.3.1. 
SPEAKERS 

DAN FULLAN (IBM) - PRESENTATION ON DOS III . 

J. ALVAREZ & W. SELSMEYER - QUESTION £ ANSWER SESSION ON DOS. 
MODERATED BY D.R. MC ILVAIN 

DISCUSSION 

DOS III (ACTUALLY A NEW RELEASE OF DOS II, NOT FORMALLY NAMED 
DOS III) - SEE ATTACHED WRITE-UP. THIS IS SCHEDULED FOR RELEASE 
IN SMALL PART 11/67 £ COMPLETE 4/68. QUESTION £ ANSWER SESSION 
FOLLOWED. 
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SYSTEM/360 
DISK OPERATING SYSTEM 
IMPROVEMENTS 



Scheduled Improvements to DOS 



I would like to spend the next few minutes or so discussing some significant 
improvements to the Disk Operating System. These improvements which 
will be available with subsequent releases of DOS include Additional Device 
Support, namely the 2314, Additional Features in the Supervisor to improve 
performance, for example, seek separation, Increased Capabilities, such 
as expanded multiprogramming capabilities, and a number of related features 
to simplify operations, for example, label handling. Let's go over these 
now in a little more detail. 

2314 Support 

The 2314 direct access storage facility has received wide acceptance in the 
intermediate systems marketplace. The programming support provided for 
this device reflects this acceptance. Full system support will be provided 
for the 2314. This includes system residence, that is, residence for all IBM 
components currently supplied in DOS/360, except Autotest, systems input 
and output on the 2314, full systems libraries support, full data management 
support including QTAM, Sequential Access, Direct Access, Index Sequential 
Access, and Device 4 Independent Access. All current DASD utility functions 
will include support for the 2314. Additional support in the form of new 
special purpose utility programs will be provided for both the 2314 and the 2311. 
These utilities include a Volume Table Of Contents Display, an Initialize Disk 
Program, an Assign Alternate Track Program, a program to copy Disk to Disk, 
and programs to Copy and Restore Disk with Tape and Cards. Full language 
support is provided for both compilation and object time support. This includes 
the Assembler, COBOL, Basic FORTRAN and RPG. We intend to provide PL/I 
and Sort/Merge support. Information will be provided at a later date. All support 
will take advantage of the increased capacity of the 2314 as well as the speed of 
the unit itself. 

Simplified Label Handling 

We have modified the labeling procedures in DOS to provide for a simpler 
more efficient operating environment. These procedures will involve the use 
of fewer cards and label cards that are reusable. Tne formats have been im- 
proved and more room has been provided for standard labels. In addition, 
standard labels can now be used for Index Sequential and Direct Access files. 

Two types of standard labels will be provided. Standard labels will be available 
to programs operating in all three partitions while partition standard labels will 
be available to programs in the specified partition only. \ A total of six tracks for 
user labels and partition standard labels are available. 'On the 2311 four 
additional tracks and on the 2314 fourteen additional tracks will be provided for 
standard labels. We have then the possibility of labels appearing in one of three 
parts of the label cylinder. It may appear as a user label associated with the 
specified partition, as a standard label associated with that partition, or as 
a standard label available to all partitions. 
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The increased capacity for standard labels and the ability to use standard 
labels for direct access and index sequential files should greatly reduce 
the number of label cards and handling required in an operating environ- 
ment. 

The number of cards required for label handling has been reduced. We 
have a DSKL card which replaces the VOL and DLAB cards required 
today. The parameters for this card may be expressed in a variable 
format, some of the parameters have been made optional. Date need no 
longer be expressed as absolute creation and expiration dates, a reten- 
tion period may be substituted. This will enable the DSKL card to be 
reusable, that is, once label cards have been set up for a production 
run, the same cards may be used each time the run is executed. 

A new EXTNT card has been provided. In this card the upper and lower 
limits of the extents do not have to be expressed in absolute form. You 
may specify relative track, that is, the sequential number of tracks 
relative to zero where, the extent is to begin and the number of tracks 
the extent is to contain. On input files the information that is supplied 
by the extent cards can also be taken from the label itself so that in many 
cases an extent card will not be required. 

Data sets on tape are defined by means of a new TLAB dontrol card which 
replaces the current VOL and TPLAB cards. Here again a retention 
period may be specified instead of an expiration date. When a volume 
label is not found on a labeled output file, it will automatically be created 
based upon a serial number supplied by the operator. A multi-volume 
file may be opened at other than the first volume. 

To summarize the label processing capabilities of DOS, the number of 
cards required for disk labels has been reduced from three to two and in 
some cases only a single card will be required. A single card will now 
suffice for tape labels instead of the two cards previously required. In 
addition, since retention periods can be specified these cards are re- 
usable, that is, new label cards need not be punched on a daily basis. 
The expansion of the standard label facilities both for the number of 
standard labels that can be stored and the types of files that can use 
standard labels provides for an even further reduction in the label cards 
required in an operating environment. I am sure that those of you involved 
in day to day operations will appreciate the reduced burden on operations 
personnel made possible by these improvements. 

Seek Separation 

The seek separation feature was designed to improve the performance of 
systems running under DOS. This feature, provided by a supervisor 
option, enables the supervisor to separate a seek from its associated 
read or write so that the seek can be separately scheduled. This means 
that multiple seeks can be issued to devices on a channel and the reads 



-3- 



and writes scheduled as the seeks have been completed. As this is a super- 
visor function, it will automatically apply to programs written at any language 
level and operating in all three partitions. The benefits derived from this 
feature will increase the larger the number of devices on a channel. The 
implementation of this feature is such that when a seek has been issued to a 
device the arm cannot again be shifted until the I/O operation that initiated 
the seek has been completed. In other words arm stealing has been prevented. 
Following the issuance of a seek the channel is available for scheduling other 
I/O operations. In a multiprogramming environment this feature is particularly 
important where the different partitions have a mix of input/output requests for 
a single channel with multiple direct access devices. 

The seek separation feature is specified at Systems Generation time and will 
add approximately 200 bytes to the size of the supervisor plus 4 bytes per 
direct access device. 

Full Track Add 

We have improved the efficiency of the index sequential access method when 
adding records to the file by utilizing a full track add feature. This feature 
enables the user to provide room in core for up to as many physical records 
as can be contained on one full track. When a new record is added to an index 
sequential file that record is inserted in sequence and records that have a higher 
key are shifted to make room for it. The highest record on that track will then 
be placed in the overflow area. Without the core data feature when a logical record 
is added to a block each block on that track must be read, the records internally 
shifted, and then written back to disk. When the core data feature is specified, 
two or more physical records up to a full track will be read at one time. The 
records shifted internally and then written out together. For example, when room 
in core is provided for a full track, it will take 4 1/2 revolutions or less to add 
a record to that track. While without the feature, 3 revolutions will be required 
for each physical record on that track. Let us suppose a blocking factor of 
4 physical records per track. When adding records to that track using the core 
data feature for a full track add, 4 1/2 revolutions are required compared to 
12 revolutions without the feature or approximately a 300% improvement. To 
utilize this feature, an I/O size parameter must be specified in the DTFIS to 
reserve room in core for the additional data area. Core data equals yes must 
be specified in the index sequential module itself. The additional core require- 
ments for this feature are 16 bytes per DTF and 175 bytes in the index sequential 
module itself. 

Cylinder Index 

We will also provide the capability to maintain all or part of the cylinder index 
in core. This will have a significant impact in efficiency during random retrieval, 
since the seek and read time of the index itself can be completely eliminated. 
This facility is achieved by specifying the name and size of the area reserved for 
the cylinder index in the DTF and specifying core index equals yes in the index 
sequential module. Where there is not sufficient room in core for the entire index 
it is possible to make only a portion of it core resident. 



The core requirements to use the cylinder index in core feature are mini- 
mal. An additional 24 bytes are required for the DTF plus 150 bytes in 
the index sequential module. This of course is in addition to the core 
required for the index itself. 

Both the full track add and the cylinder index feature are available only 
in the Assembler language. 

Multipr oqr amming 

In the area of multiprogramming we have made a number of improvements 
to programs operating in foreground partitions. In the current system 
foreground programs are initiated by the operator individually by a fore- 
ground initiator. We refer to this as Single Programming Initiation (SPI). 
Included in the improvements for multiprogramming is another method of 
initiating foreground partitions called Batch Job Foreground (BJF). This 
option will allow a batch job stream to be executed in the foreground parti- 
tions. Other multiprogramming improvements include individual commun- 
ication regions, checkpoint/restart and the use of system logical units in 
the foreground partition. These features allow for execution of all user 
programs regardless of source language in the foreground partition 
operating under BJF. 

Let ! s examine foreground batch job capabilities. In addition to the back- 
ground partition, one or both foreground partitions can be operated in the 
batch job mode if sufficient Input/Output and CPU facilities are available. 
The requirements for operating foreground programs in batch job mode 
are a minimum 10K partition size, separate systems input and output 
files for the partition and the specification at system generation time for 
batch job program support. The batch job foreground option will add 
approximately 350 bytes to the basic size of multiprogramming super- 
visor. This includes the storage requirements for a communications 
region for each of the foreground partitions. If disk system input and 
output is desired for the foreground, an additional 250 bytes or a total 
of approximately 600 bytes will be required in the supervisor. All 
system class logical units except SYSLNK will be usable by foreground 
partitions regardless of whether they are operated in the batch job or 
single program initiator mode. However, if the single program initiator 
is used then SYSRDR, SYSIPT, SYSPCH, SYS LST must be assigned to 
unit record devices. The IBM supplied utility programs will be 
distributed to run in the background area but may be link edited by the 
user to operate in the foreground with batch job initiation. No other 
types of IBM supplied programs are intended to be available to the fore- 
ground partitions. 

Let's take a look at some of the environments that are possible with the 
Disk Operating System. In a 16K system we can run a batch job stream, 
where 6K is available to the supervisor and 10K available to background 
programming* One restriction in this environment is the inability to 
compile COBOL programs since the COBOL compiler requires a minimum 
ofl4K. 



In a 24K system with a supervisor that runs between 8 and 10K, we can have 
a background program of 10K plus up to two foreground partitions operating 
with a single program initiator. 

At the 32K level besides operating a 10K background program, we can have one 
foreground program operating in the batch job mode and a second foreground 
program operating with a single program initiator. 

At the 64K level we can have three programs operating in a batch job environment, 
background, foreground 1 and foreground 2. The supervisor requirements would 
be at least 10K, with 10K minimum requirements for background and foreground 
programs. The additional 24K that I have shown available for the background 
could be distributed amongst all three partitions. 

Let's summarize the improvements in the multiprogramming capabilities of DOS. 
I have mentioned the features available for background programs, foreground 
programs operating with the batch job initiation, and foreground programs 
operating under the single program initiator. Program initiation itself is auto- 
matic when working from a batch job stream for both background and foreground 
programs. Under the SPI it is still operator initiated. Individual communication 
region will be provided for each foreground program operating under the batch 
job mode. The Checkpoint/Restart facilities now available to background programs 
will also be available to foreground programs operating under the batch job mode. 
The systems service programs such as the librarian and linkage editor, the Lan- 
guage Processors and Sort/Merge can be executed only in the background partition. 
Utility programs will be distributed for execution in the background partition but 
can be link edited by the user for execution in the foreground where a batch job 
mode has been specified. The multiprogram system utility macros as today will 
be available in all partitions. Minimum partitions sizes are for background program 
10K, 14K if you want to compile COBOL programs, 10K for batch job initiation 
in the foreground and 2K when the single program initiator is used for foreground ' 
programs. 

Device Independence 

There will be a new device independent access method for systems units. This 
access method DTFDI and the device independent module will support sequential 
processing of unblocked records for files on SYSLST, SYSIPT, SYSPCH, and 
SYSRDR. Using this new access method the user can change device assignments 
at object time without having to reassemble source program and without explicit 
knowledge of the functional characteristics of the assigned device. Besides 
providing device independence at object time the use of the device independent 
module will reduce core storage requirements since one module can be used 
instead of several as are required today. 
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Private Libraries 

We are adding a new. facility to DOS to provide for a librarian function 
that will allow users to create and use private source and private re- 
locatable libraries on packs other than the system resident pack. This 
new facility will give the user greater flexibility in allocating library 
space with the result that more room on the system pack itself will 
be available for an expanded core image library. The number of private 
libraries is not limited, as many private libraries as desired may be 
created. However, only one of private source and/or relocatable library 
can be operative on the system at any one time. It is also possible to 
use the relocatable and source libraries on the systems resident pack 
in combination with private relocatable and source libraries. In addition, 
it is possible to eliminate the source and relocatable libraries on the 
systems residence pack. Library maintenance and service functions 
will apply to these private libraries. 

CSERV 

We have added a new librarian service function called CSERV. This 
function will enable the user to display, punch, or display and punch 
a specified phase or complete programs from the core image library. 
This facility will give the user the ability to transfer programs or 
phases from the core image library of one systems resident pack to 
the core image library of another systems resident pack. Since 
SYSPCH may be assigned to tape or disk an intermediate card step will 
not be necessary. The display, the punch, and display punch functions 
can be used for a phase, a program, or the entire library. 

New Resident Utility Programs 

We have provided in addition to the existing utility programs six additional 
utility programs resident under DOS. 

The VTOC display program will enable the user to display the labels 
contained in the volume table of contents of a disk pack. This will enable 
him to more easily keep track of his files and their extents. The output 
of the VTOC program may be directed to a printer, a tape file or a disk 
pack. Labels are identified by their locations within the VTOC and their 
format types. There are no special utility modifier cards required for 
this program. All that is necessary to execute the VTOC program will 
be a job card, assign cards, and an execute card. 

Another utility program Is the initialize disk program. This program pre- 
pares the disk pack for use on the 2311 or 2314 disk drive. The initialize 
disk program first checks the volume table of contents to verify that 
there are no unexpired files on the pack. It then generates home 
addresses for each track, does a surface analysis assigning alternate 
tracks when required and pre-formats the volume table of contents. 
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The alternate track assignment program is used to assign alternate tracks 
to replace defective tracks on the 2311 or 2314 at any time other than when 
initializing the pack. When an alternate track is assigned the records 
contained on the defective track may transfer to the alternate track. Full 
diagnostics are also provided. 

Three separate programs are provided to copy and restore disk packs. 
These are copy and restore disk with card, copy and restore disk with 
tape, and copy disk to disk. These copy programs may be used to copy 
the entire volume or just specified files. When the copy volume function 
is used the entire contents of the volume including the IPL records, 
volume labels, and the VTOC will be copied. The copy file function permits 
the transferring of a data file from disk to cards, tape, or another disk 
pack. 

Availability 

There is one more important subject to be covered. That is the avail- 
ability of these improved facilities of the Disk Operating System. The 
improvements in the tape label area will be available from the Program 
Information Department November 17, 1967. The rest of the improvements 
that I have discussed for the Disk Operating System will be available 
April 5, 1968. 
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SESSION NUMBER T.3.2. 



NO FORMAL SPEAKERS* WADE NORTON, ACT ' G. CHAIRMAN, HAD BEEN 
SCHEDULED TO PRESENT A PAPER ON RUST ENGINEERING CO.'S. 16K OS 
WHICH RUNS ON A 65K MACHINE. THE OS PROJECT FELT THAT MOST OF 
THEIR MEMBERS ALREADY KNEW THE ADVANTAGES, AND THAT THE 
PRESENTATION COULD BETTER BE MADE AT A LATER MEETING WHEN MORE 
PUBLICITY COULD ATTRACT MORE DOS* ERS W/ OR PLANNING 65K CORE. 

DISCUSSION 

WE THEN DISCUSSED SAN FRACISCO (OR LATER MEETINGS). THE NEXT 
MEETING NEEDS TO COVER 

A. LINK EDIT (I), SCHEDULER (I) 

B. LINK EDIT (II), SCHEDULER (II) 

C. OS FOR THE USER OF SMALL 360'S, PRESENTATION OF PAPER 
ON RUST'S SYSTEM £ PANEL OF OTHER SMALL OS'ES. 

ON RUST'S SYSTEM £ PANEL OF OTHER SMALL OS'ES. 

D. PLANS £ ORGANIZATION SESSION. 

E. SQUAWK SESSION. 
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SESSION NUMBER T.3.3 
SPEAKERS 

HARISH J . JAGTIANI, RICHMOND ENGINEERING CO., INC. ON FORTRAN 
PROCESSOR FOR DRILLING TUBESHEETS ON NC MACHINE 
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FORTRAN PROCESSOR 
FOR 

DRILLING TUBESHEETS ON NC MACHINE 



by 

Harish J. -Jagtiani 
Richmond Engineering Company, Inc. 
Richmond, Virginia 

presented at 
COMMON, Cincinnati Meeting 
September 6, 7, & 8, 1967 

NUMERICAL CONTROL 

Numerical Control (or NC) is a control system using punched tape or other 
automatic control devices to direct the operation of machines and machine 
systems. Numerical Control provides a highly accurate and efficient means 
of positioning or controlling the path of a tool. Machine tools are classified 
as being point-to-point or continuous in operation. 

M Point-to-Point" implies that machining operations cire only at certain 
locations on a part and that the cutter is retracted from the piece before it 
moves to another location. Point-to-Point, particulary valuable for precision 
drilling, boring, reaming, involves automatic coordinate setting. Careful 
layout, therefore, is less dependent upon the operator. "Continuous" (or 
contouring) implies that there is no retraction of the cutter as it produces a 
path in moving throughout a specified area. Pokvt-to-Point machines operate 
in two dimensions; continuous machines in two or three dimensions. 

NUMERICAL CONTROL AT RECO 

The application that we are particularly concerned with, at Richmond Engineering 
is for NC Point-to-Point machine tools. In the manufacture of process heat 
transfer equipment, a good portion of th-e-work is involved in the drilling of 
holes in the tube sheets and baffle plates of heat exchangers and the bolt holes in 
the flanges. With a view to secure some of the benefits from automation, 
Richmond Engineering decided to acquire a NC drilling machine. In 1961, we 
purchased Pratt and Whitney's Tape-O-Matic numerical drilling machine. It 
is a single machine with a table working surface of 30" x 20" and a transverse 
table travel of 15". This machine is capable of taking care of the drilling for 
RECO Standard Products up to 16" diameter. The experience gained *with the 
Tape-O-Matic proved that NC machines could certainly provide tremendous 
advantages. With an increase in business activity Richmond Engineering decided 
to purchase a much larger drill press which would not only produce dollar 
savings but replace some of the existing manual drills and still have enough of 
excess capacity to handle increased business. 

In late 1964, an order was placed for the American NC 819-32 Travelling 
Openside Boring and Drilling machine. This has an actual work area up to 92 
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inches wide and length of 15 feet. This machine has now been installed and 
is currently in operation. 

The job planning procedure for this machine was similiar in many ways to the 
Tape-O-Matic. The machine has a "floating zero" or a "full zero shift" feature, 
as shown in figure 1. The reference point is set at the center of the tubesheet, 
which then allows the parts programmer to give all axis dimensions relative to 
the workpiece. The programming done manually was hand-written on a process 
data sheet, 

DATA PROCESSING FOR NUMERICAL CONTROL MACHINES 

In the preparation of "programs" or "instructions" to govern the movements 
and processes of the numerically controlled devices, there was the problem 
of cummulative tolerance errors being introduced through manual computational 
procedures. 

An investigation was undertaken to determine what aid could be offered to alleviate 
the problem of computational tedium and inherent accuracy difficulties associated 
with manual preparation for NC processes. The thought of computations and 
accuracy naturally suggested electronic computers as a possible means for 
solution, 

IBM has developed a simple language AUTOSPOT (AUTOmatic System for 
Positioning Tools). AUTOSPOT is a general purpose computer program designed 
to aid the parts programmer perpare instructions for NC Point-to-Point machine 
tools. The parts programmer can describe the required operations in a familiar 
language, without calculations, repetitions, and the tedium of output format 
preparation. 

The AUTOSPOT general program processor receives the input information, performs 
various operations, and delivers outputs to the post processor. The post 
processor converts the information into the data required to perform the 
machining by a specific machine tool. Since there was not an existing post 
processor for the American drill and writing up on would involve considerable 
time, several months, investigation was directed to prepare an aid to our 
specific problem that would specify the locations of the centers of equally spaced 
holes on the tubesheet and also the locations of the centers of any number of 
equally spaced holes on the bolt circle. 

In this effort to relieve time consuming, laborious, and technician type work 
from the shoulders of the part programmer, a generalized computer program 
has been developed to perform position calculations for tubesheet holes and bolt 
circles configurations. These configurations are common enough in our line of 
products and for a firm using numerical control equipment to justify such an 
approach. 
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EXPLANATION OF TYPICAL LAYOUT 



From a typical layout of a tubesheet you will notice the tube holes are equally 
spaced and so are the rows of tube holes. Further the layout on one side of 
the center line is generally a mirror image of the other side* 

There are two configurations of tube holes that we are concerned with. The 
tubes are either on a triangular pitch or a square pitch. 

Lets consider the center of the tubesheet as the reference point with coordinates 
of (0. 0, 0. 0). Knowing the pitch of the holes, one can easily compute the 
coordinates of each hole in each row. 

Hence for the first row the coordinates of holes marked A is (1. 0, 0. 0), B 
(2. 0, 0. 0) and so on. For the second row the coordinates maybe (1. 0, 0. 5), 
( 2. 0, 1.5) and so on. 

We can compute these coordinates manually and put them down on a process 
sheet. 

Now if a row of holes was defined by the following statement, 

SY = 0. 0, SX = 16. 0, EX = -16. 0, NH - 0. 

we can compute the coordinates of each hole in this row. 

Pitch = (EX - SX) / (NH - 1) 

= (16. - ( -16. 0)) / (33-1) 
= 1.0 

Hence 



N 


1 


Y 


0. 


X - 


16. 


N 


2 


Y 


0. 


X - 


15. 


N 


3 


Y 


0. 


X - 


14. 


N 


32 


Y 


0. 


X + 


15. 


N 


33 


Y 


0. 


X + 


16. 



This procedure is the logic of the computer program. The flowchart further 
outlines this routine to compute the coordinates of each hole, figure 2* 

FILLING THE INPUT FORM 

A typical input data form filled up is shown in figure 3. 

The master card contains some general information followed by ICODE, the 
reference point (corresponding to the Datum Reference to permit the 
specifications of point coordinates relative to the most convenient origin), total 
of detail specification cards, total number of holes to be drilled, type of pitch, 



pitch and bolt circle specifications if any. 

The detail card specifies coordinates for each row or part of each row in 
some cases. It contains SX, SY, EY, NH, JT and EXCEPT. 

Where SX - Starting X coordinate 

SY - Starting Y coordinate 
EY - Ending Y coordinate 
NH - Total number of holes 
JT - Total number of exception holes 
EXCEPT - Position of exception holes 

EDITING THE INPUT 

After the input form has been filled and the cards punched we run an edit of 
the input data. The edit program checks the input data for completeness and 
consi stency . 

The edit program checks the following: 



1. 


Code 


2. 


Bolt circle specifications 


3. 


Pitch of the holes 


4. 


Spacing of the rows of tubes 


5. 


Total number of holes 


6. 


Total number of detail cards 


on. 





The output listing from the edit may appear on the first run, somewhat as shown 
by figure 4. 

After the edit is run the errors - if any - are corrected, and the input deck is 
run through the processor. The processor punches the output ca.rd and also lists 
each block of the data for the NC machine on the printer. A listing of the output 
is as shown in figure 5. 



USING THE 3 - SPINDLE DRILL 

On the American NC Drill we can also put a 3-spindle attachment. Preparing 
a tape to run with the 3-spindle drill is naturally somewhat different from that 
for the single drill. 

The attachment we have and the usual pitch of the holes we maintain limits 
drilling three consecutive holes. Instead we have to drill 3 alternate holes 
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at one setting. 

For example if we had 6 holes equally spaced in a row, we first center the 
drill over hole number 3 and drill holes 1, 3, and 5. Then we position drill 
over hole number 4 and drill holes 2, 4, and 6. In other words we drill 
groups of 6 holes in 2 operations. 

The processor automatically takes care of this. Now we do have rows of holes 
of less than 6. These holes we pick up on the single spindle drill. The 
processor hence is designed to segregate groups of holes to be drilled with the 
3 spindle drill and those with the single spindde. These two data sets we 
store on the disk. Each record in the first set is accessed and cards punched 
out for the same. Then the same is done for the second set of records. 

The general flowchart of the processor is shown in figure 6. 
LIMITATIONS OF THE PROCESSOR 

Obviously the processor we are talking about has its limitations. It is not 
as versatile or powerful as the AUTOSPOT processor. For instance, one 
half of the tubesheet is generally symmetrical about the axis, If the parts 
program were written in AUTOSPOT language, just one statement would 
have sufficed to invert the pattern on one side to the other. But with our 
present processor we have to define each row of the other half again.. Of 
course this is not too difficult, because all the parts programmer has to do 
is to reverse the sign for the SX dimensions. However, this is not what you 
may call very sophisticated. We also have the problem of not being able to 
define patterns other than the bolt circle or a row. 

Not long back we had a job which had a pattern of 3 concentric circles each with 
36 holes and another pattern within the triangle formed by the circles. There 
were roughly 8000 holes to be drilled. Doing the programming manually would 
have taken ages. So we wrote a special program which consisted of routines 
from the original processor. This was not difficult but certainly took some 
effort and time, which could easily be saved by using AUTOSPOT. 

PUNCHEDTAPE PREPARATION 

The data input to the machine tool is one inch perforated 8 channel tape in 
accordance with EIA standards. 

Initially the tape was manually punched on a Friden Flexowriter. This was 

both time consuming and laborious task full with human errors and omissions, thu 

offsetting some of the advantages gained by using the computer. 

When we changed to card output from the computer we added a Friden Automatic 
Card-to-Tape Convertor to the 2201 Flexowriter. Now the cards are fed in the 
card reader and the tape is automatically punched out. 
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CONCLUSION 



This processor as you can see is not very sophisticated or powerful as many 
others. However it has proved extremely easy to use for the parts programme 
The programmer does not need any knowledge of computers or computer 
languages. It has considerably reduced the lead time in preparing tapes fo^~ 
the NC machines from days to a couple of hours. And finally it has helped 
a small manufacturing company with somewhat limited skills and resources 
to increase its productivity and product quality. 
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NOTES: 

ALL COLUMNS SHOULD BE CODED 
FOR F. ACH LINE. FILL WITH 
ZEROES WHERE NECESSARY. 

ICODE = 1 for tubesheet only 
= 2 for bolt circle only 
- 3 for tubesheet & bolt 
circle 

= 4 for tubesheet (3- spindle 
drill) 

= 5 for tubesheet & bolt holes 
(3- spindle drill) 

JP ~ 1 for triangular pitch 
= 2 for square pitch 

LV = . if angle is given 

= 1 for bolt circle holes to be 
straddled about center line 

JT = total number of exception 
holes 
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LISTING AND CHECKOUT OF INPUT DATA FOR AMERICAN NC DRILL 
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DETAIL CARD NO... 4 SPACE BETWEEN THIS ROW AND PREVIOUS - COMPUTED # 4.3300 GIVEN # 1.0825 
DETAIL CARD NO. . 4 COMPUTED PITCH * 1.2838 GIVEN PITCH # 1.2500 

2 4.3300 -23.7500 23.7500 39 00000000000 

DETAIL CARD NO... 5 SPACE BETWEEN THIS ROW AND PREVIOUS - COMPUTED #-2.1650 GIVEN # 1.0825 
2 5.4125 24.3750 -24.3750 40 00000000000 
2 2475 24.3750 -24.3750 41 00000000000 

DETAIL CARD NO... 7 SPACE BETWEEN THIS ROW AND PREVIOUS - COMPUTED #-2.1650 GIVEN # 1.0825 
DETAIL CARD NO. . 7 COMPUTE PITCH # 1.2188 GIVEN PITCH # 1.2500 

2 7.5775 23.1250 -23.1250 38 00000000000 

DETAIL CARD NO... 8 SPACE BETWEEN THIS ROW AND PREVIOUS - COMPUTED # 4.3300 GIVEN # 1.0825 
2 8.6600 -22.5000 22.5000 37 00000000000 
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NUMBER OF OETA ILCARDS ACTUAL* 38 GIVEN* 35 
NUMBER OF HOLES ACTUAL* 1270 GIVEN* 1275 
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RECO PROCESSOR FOR AMERICAN NC DRILLING MACHINE ^ 



TUBESHEET HOLES COORDINATE DATA 
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<tHEMl£Ai ENGINEERING APPLICATIONS OF CSMP 



The 1130 Continuous System Modeling Program, an adaptation of PACTOLUS, 
is a new digital-analog simulator specially developed for online experimentation by 
the design engineer. 1130 CSMP, in combination with the computing power of the 
IBM 1130, has demonstrated itself to be an effective and economical tool for simu- 
lation studies across the breadth of engineering practice and the physical and bio- 
logical sciences. It provides a library of 25 standard elements plus five "special" 
elements that the user himself may define. Interaction with the program is simple 
and convenient via the console keyboard and the console entry switches. From the 
keyboard, or via punched cards, the user enters 1 130 CSMP language statements 
defining the configuration and associated parameters. During entry, automatically 
typed instructions and diagnostics guide the user through the procedures. These tell 
him how to initiate data entry, how to select the variables for printer and plotter 
output, and how to specify the integration interval, total run time, and output 
intervals. He may interrupt a simulation run at will to modify or extend the simu- 
lation, and need not follow a rigid schedule. 

The Continuous System Simulator Approach 

The S/360 Continuous System Modeling Program offers the best available 
illustration of what can now be done in continuous system simulation. This IBM 
program is an advanced version of DSL/90, the most powerful of previous efforts 
of this kind. S/360 CSMP incorporates a number of novel features: it can, for 
example, incorporate procedural coding within the definition of a macro element; 
it can conveniently calculate initial and terminal conditions (thus placing the 
entire simulation under programmed control). These new features provide the 
engineer a significantly more powerful and sophisticated tool for simulation. 
Working with a basic set of functional elements for modeling the components of 
continuous systems, the S/360 CSMP user specifies the interconnection of these 
functional elements by the (FORTRAN) equivalent of common mathematical nota- 
tion for functional dependencies, namely, Y= F(X) . S/360 CSMP thus represents 
a rapprochement between analog block modeling and conventional digital program- 
ming. In addition to the block modeling capability shared w ith digita I -ana log 
simulators, this kind of program provides the power and convenience of algebraic 
and logical statements. Its FORTRAN-like language can be used as either a parallel 
(non -procedural) or as a procedural programming language. 

The relative advantages of these two programs were compared within the 
context of a chemical engineering example; this example was previously described 
in connection with PACTOLUS in the March 1966 issue of Instruments and Control 
Systems. (An expanded version of this simulation study is expected to appear in a 
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future issue of Genie Chemique.) Several other interesting applications in chemical 
engineering are described in the Proceedings of the IBM Sc ientific Comp uting 
Symposium on Digital Simulation of Continuous Systems, IBM Form No, 32-01943. 

Both programs are available from IBM as Type II supported application pro- 
grams. The Application Descr iption Manuals for 1 130 CSMP and 360 CSMP are 
available under Form No. H20-0209-1 and H20-0240-1 respectively. 
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With the rapid changes we have been experiencing over the past decade 
in the data processing industry with regard to hardware, programming 
systems and applications, it is quite natural that there likewise be a 
corresponding change in the role of the IBM account representative. 
This change has not been an attempt to alter the primary responsibility 
of the account representative, which has always been and will continue 
to be "service to the customer u , but one of implementation of that re- 
sponsibility. 

The complexities of the industry today have brought about a need for a 
type of salesman who is not only knowledgeable in all aspects of data 
processing, but one who acts as an interface between the customer and 
the IBM Company. No one individual is able to be an expert in all facets 
of data processing and still possess the ability to comprehend every 
conceivable application area the customer may have in his business. For 
this reason there is a trend to cover our larger accounts with a self suf- 
ficient team made up of experienced employees with both marketing and 
systems engineering backgrounds. Their job is twofold. One, (Slide 1) 
they must represent all of the service, experience and technical exper- 
tise of the IBM Company to you the customer, and two, (Slide 2), they 
must represent you, the customer, to IBM. 

(Slide 3) - In carrying out this twofold responsibility, a thorough knowl- 
edge of both organizations is a necessity. As far as your business goes, 
the IBM account representative must have detailed knowledge of the 
applications you presently are running as well as those that are in the 
development stage. This includes not only the volume figures, input 
sources and output requirements, but the interrelationship of these ap- 
plications as well. In addition, he must know your organization, where 
the data processing function fits into the corporate structure and what 
the evolution of this organization has been. Another important aspect 
the account representative must be keenly aware of, and one that our 
company is putting a great deal of emphasis on, is knowledge of the par- 
ticular industry, whether it be finance, education, insurance, manu- 
facturing, and so on. Khowlege of not only what is occuring in the industry 
today, but what are the trends of the industry. Finally, it is imperative 
that the account representative have a good working relationship with the 
top executive management of his customer so he knows what the long range 
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goals of the business are and can make long range recommendations 
regarding data processing • As you are all aware, the implementation 
of a data processing function, if done correctly, takes many weeks and 
months of planning, testing, installing and converting. If this time 
spent is not consistent with the long range objectives of the business it 
can be disastrous to all concerned. To sum it up, the account repre- 
sentative must work hand in hand with every level of management (Slide 4) 
aspect of your business and become as knowledgeable as you yourselves 
sire. 

Once this knowledge is gained, and it is a continuing process to say the 
least, the account representative must couple it with the knowledge, 
experience and education he has received from the IBM Company. This 
knowledge covers the full spectrum of IBM (Slide 5) products, services 
and resources as well as our company policies and business practices. 
It is the responsibility of the team manager to be sure that he has 
developed the required talents within the team itself and to be cognizant 
of these resources so he may utilize them as the situation dictates. These 
include such services as industry specialists, product specialists, 
application specialists, operating system and programming specialists 
and many more who are available from district, region and division 
headquarters to assist the local people in fulfilling their primary role - 
that of services to you the customer. The account representative must 
have in-depth knowledge of the products capabilities, relationship to 
other hardware, characteristics, potential and most importantly the 
application value to solve a particular problem or set of problems. 
Other information that the account representative must be intimately 
familiar with in order to be of maximum service to the customer is, of 
course, our own internal policies and business practices so as to be in 
a position to advise and counsel in regard to contracts, deliveries, prices 
and stay withing the general business rules that we must follow. 

The account representatives can work hand in hand with you in such 
matters as (Slide 6) providing professional guidance and advice on organ- 
ization, both within the data processing group and the relationship of data 
processing with the other departments of the business. Advice on budget- 
ary matters very often can be offered by the account representative in 
light of what other firms are doing and trends within the industry group. 
Personnel matters is another area where the experience of the account 
representative can be used to offer suggestions on position descriptions, 
salary ranges, apptitudes, and labor markets. This advice can materially 
assist you in your day to day operations as well as long range planning. 
Planning sophisticated applications such as Management Information Systems 
or Total Integrated Systems, Educational programs, Teleprocessing 
systems and the long range data processing plan, can all be facilitated 
within the assistance of the account representative. 



The things I've been mentioning all have been areas where you, as 
customers, can benefit the most in developing a working relationship 
with your IBM account representative. In doing so, the IBM repre- 
sentative is fulfilling one of his primary responsibilities, and that is 
to make sure that every account in his territory is a satisfied customer, 

A mutual respect for the other person's activities must exist between 
the customer's personnel and the account representative. 

This mutual respect refers to the relationship the account representative 
must have for the supporting services available to him from the IBM 
Company, as well. In acting as the interface between the customer and 
the IBM Company, he must properly utilize these services in the best 
interest of both. The group that he usually works closest with, of 
course, are the Systems Engineers. We are fortunate to have with us 
today an SE who's qualifications make him one of the finest examples 
of service excellence in the IBM Company. I'd like to turn the conference 
over to Russ Meteer. 
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As the complexities of the Data Processing industry have increased 
over the years, it has become unrealistic to expect any one person to 
provide all of the knowledge and talents necessary to meet the varying 
needs of a computer installation. I am sure if you, as a group, look 
at your own operations, you will find Data Processing being used for 
engineering and scientific computation, accounting and record keeping, 
and management guidance and control. Each of these areas poses 
unique requirements. The Systems Engineer brings specific talents 
and sources of information to bear on these varied problems. 

Generally, Systems Engineering will be most active during the install- 
ation planning phase. The installation of a Data Processing syste.Ti 
consists of six major elements: (Slide 1) design, programming, testing 
and debugging, documentation, conversion, and implementation. 

The most important factor which affects each of these six elements is 
your in-house capability to accomplish them. Education is, and has 
been for many years, one of the important initial phases of your ex- 
perience with IBM, and is the beginning of the development of this 
in-house capability. The transition from formal classroom training to 
the practical application of your newly gained knowledge to systems 
design, programming, and productive use of the system is one of the 
key elements in the relationship between the Systems Engineer and you 
as a customer. The Systems Engineer brings to you the technical 
guidance necessary to make this transition. 

The services provided to you by the Systems Engineer will vary to a 
great degree depending on the use you are making of your system. 
The common element in any case is the importance of making the trans- 
ition from theory to practice. 

You might ask why IBM is so concerned with customer self-sufficiency. 
Only you can make the most effective use of the system in your organiz- 
ation. Many studies over the last few years have shown that the key to 
a successful computer installation is user participation and management 
attention. 

Let's discuss the ways in which Systems Engineers will help you develop 
your data processing skills during the installation planning. Design is 
essentially defining what is to be done. If your applications are engin- 
eering oriented, this probably involves formulation and the translation of 
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the formulas to FORTRAN. If your jobs are more accounting-oriented, 
then design of the systems flow and a definition of terms is involved. In 
either case, you as the user know best what your problems are, and what 
results are desired. The Systems Engineer can often assist you by showing 
you tried and proven approaches to obtain a solution. In addition, he can 
discuss your own ideas with you and help you to evaluate their effective- 
ness in achieving the desired result. 

Pr o gr a mmin g is one thing which you learned in some detail in your 
education program. There is a difference, however, between class- 
room case studies and actual programs. Here the Systems Engineer 
provides guidance and helps you in the use of various programming 
techniques until you have developed a proficiency of your own which 
•allows you to work independently. 

Testing and debugging usually provides the first opportunity that a cus- 
tomer has to operate the system. Those first unsure moments at the 
console change very rapidly to an "old friend" relationship with the 
proper guidance and counsel provided during the early testing phases. 

Probably the most neglected and overlooked phase of installation planning 
is that of do cumenta ti on . And yet, for a smoothly operating installation, 
documentation is qssential. The plan in a programmer's mind is not a 
suitable substitute for readily available documentation. Providing that 
you, the customer, have made normal progress in developing a program- 
ming and testing proficiency, documentation can proceed without a 
great deal of SE involvement. I would say that the main contribution in 
this area is one of constant nagging to be sure that the job is actually 
accomplished. We humans seem to have an aversion to writing things 
down. 

Conversion is largely a clerical function, but it requires close coordination 
and monitoring to insure that all the records of your company are correctly 
transcribed into the format intended for processing by the programs which 
have been developed. 

And finally, implementation . As the saying goes, "the proof of the pudding 
is in the eating. " I am sure that all of you have had a few sleepless nights 
during that period when you were implementing the programs on the system 
and making them work with real live data. At this time, the Systems 
Engineer will be close at hand, but, hopefully, he will have been able to 
help you develop to the point where you are able to do much of the imple- 
mentation yourself and the crises of implementation are minimized. 

There is one thing I would like to make quite clear and that is that the 
SE is not always all-knowing. He sometimes runs down blind alleys and 
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finds problems which he cannot solve. However, he has available to 
him a number of sources of information which can help him to help 
you. (Slide 2) In each district, a Field Systems Center is available 
to him as a source of technical information and ^guidance. The Field 
Systems Center encompasses the Education Center, Test and Datacenter, 
and a Systems Design and Installation Center, better known as SD&J. 
It is this last group, SD&J, which provides the necessary technical expertise 
to assist the Systems Engineer in questions on programming languages, 
operating systems and application-oriented programs, such as simulation, 
netword design, etc. (Slide 3) The Field Systems Center in turn can go 
to one of our programming centers, either in Poughkeepsie , or Endicott 
in order to research problems and questions for which there are no 
answers at a district level. The programming centers have direct 
contact with the implementors and development groups to resolve any 
questions which the programming centers cannot answer. 

Another source of Systems Engineering assistance, which is available 
in many of the metropolitan locations, is the Installation Center. The 
Installation Center concept is one in which the Systems Engineering 
installation planning assistance is centralized in order to concentrate the 
various resources of information together in one location so that they 
might bear directly on the customer's problem. In the Installation Center 
the customer may do his programming and testing in a machine environ- 
ment having constant guidance available from one of the Installation Center 
personnel. Currently these centers support the 1130, S/360 Model 20, 
and punched card equipment. Experience shows that the Installation Centers 
accelerate the installation planning cycle and the customer's learning 
process. 

In the past, the Systems Engineer also has been heavily involved in the 
maintenance of Type I programs after installation. This function has 
now been assumed by the Customer Engineer and will be discussed by 
Mr. Monjeau from the Field Engineering Division. 

We see then the role of the Systems Engineer as one of guidance, information 
and counsel with the ultimate objective of developing customer capability. 
Self-sufficiency on your part will provide you with the means to realize 
the greatest return on your Data Processing dollar. 
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Abstract of Presentation to be Made by G. P. Monjeau, 
Field Engineering Division 



Subject: FE - Customer Relationship 



Enclosed are copies of the VV - graph foile which will be 
shown with the presentation. 



The presentation will open with a recap of the Customer 
Engineer and a brief rundown on what he does. Next is a 
description of the technical back-up for the CE for both 
hardware and software followed by aids to the CE. 

Following this is the discussion of the customer - CE 
relationship, what is required and what can be gained. 

The subject of APAR 1 s will next be discussed, touching on 
the function of the CE and SDD's roll in APAR processing. 

The last item to be covered is problem determination. 
Essentially, this covers who the customer sees when he 
has a problem. 
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A PAR 



A - Authorized 

P - Program 

A - Analysis 

R - Report 
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The purpose of this presentation is to describe the education program for 
operations. In the context of this presentation, operations includes all 
those non-management people whose responsibility it is to keep the wait 
time of the 360 to a minimum. This includes the traditional button 
pusher through the lead operator or section chief. 

Before getting into the discussion proper, let me state what the operations 
education program does not solve, but what the user must certainly 
consider. These are the areas of Job Titles, salary ranges, career 
paths, and personnel selection. Job titles as a consideration has always 
been a frustrating topic in data processing. As you'll see in a few 
moments we've overcome the frustration by literally ignoring it. 
Salary ranges is also a topic that generates lively discussion - "what 
should you pay an operator ? TT is a tough question to answer because it 
is entwined with the problem of job titles - just what is an operator ? 
Complicating the matter even further is the problem of career paths 
for operations personnel. Some installations have regarded the position 
of operator as a training ground for becoming a programmer if the 
operator is "any good". It is somewhat difficult in these installations 
to determine what happens to an operator if he doesn't make it to 
programming. One SHARE member said that operators who don't 
make^to programming in his shop leave to go to another company for a 
considerable raise in pay. A few installations have made considerable 
effort to develop career paths within operations. One company has a 
series of five positions, any one of which an employee in computer 
operations can aspire to. The promotion from one level to another is 



based upon several measurable items. 1) Classes attended and marks 
received, 2) Length of time in the position, and 3) Management evaluation. 
The last consideration concerns personnel selection, "How does one go about 
choosing an applicant for a position in data processing operations?" At 
present there are a number of tests under development for assisting an 
operations manager to help choose a potentially successful operator. 

Now back to why job titles are more or less ignored. The main reason 
is that as a guide line for IBM in developing operations courses, very 
few users could agree on the description of "operator". Hence, we could 
not use "job title" description as an aid in developing courses and texts. 
(This problem existed not only with the job title of operator, but also with 
such other data processing areas as programming and systems analysis. ) 
Therefore, in the area of operations, we listed the tasks that must be 
performed. 

* 

Here we see five operation tasks. The first one concerns deflce handling. 
This includes such activities as obtaining and returning tape reels and 
disk packs to the data bank or library, mounting and dismounting tapes 
and disks, putting the correct cards in card readers and punches, and 
putting paper and proper carriage control tape into the printer. The second 
task has to do with responding to operational messages printed on the 
console typewriter and entering commands to the supervisor program 
via the console typewriter. When I say "entering commands" I do not 
envision the console operator deciding on the spur of the moment what 
command to issue. Rather, I see the console operator referring to a 
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well documented run sheet with a list of all the commands he may make and the 
conditions under which he may make them. 

The third task has to do with system updates. This includes activities from the 
addition or replacement of modules to systems libraries, to a complete system 
generation. 

The fourth task has to do with a very complex operation, thatflf identifying the 
cause of a problem. Identifying the cause of a problem can mean doing a 
complete diagnosis, recommending and effecting the fix, or, it can mean 
calling either the systems programmer, IBM SE or IBM CE. The task of 
system restart is also an operation of varying implication. It could simply 
mean re-IPL-ing and putting the job control cards of the errant job at the 
beginning of the input stream, or it could mean first running a series of 
utility programs to restore the system to a checkpoint condition and then 
re-IPL-ing. Running the utility programs is not toodifficult - it is choosing 
the appropriate ones and preparing the proper control cards that requires 
systems know-how. 

These five tasks lend themselves to categorization as to personnel 
requirement - production people or analytical people. It's not that the 
production people aren't analytically minded or that the analytical people 
don't produce - it's more that the production people work from a recipe and 
aren't required to make spur of the moment decisions, and that the 
analytical personnel must deal with unusual and unpredicted events. 
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The people requirements of production and analytical lend themselves 
very nicely to functions of what has been called System Operation and 
Operation Control, The tasks of device handling, responding to messages and 
issuing commands, and updating the system come under the function of 
System Operation. The tasks of system restart and identifying the causes 
of problems are the function of personnel in operation control. Also, 
operation control is partially responsible for system update, viz. , laying 
out the systems residence pack and selecting the modules for a system 
generation. 

Now let's see what IBM has in the way of educational materials and courses 
to assist you. 

First of all, IBM has released within the past 4 weeks, four System Operation 
Student Texts to be used for self study. The student text packages consist 
of a text, a book of illustrations, and a hands-on exercise. There is one 
student text for DOS using the System/360 Model 40, one for DOS with 
the Model 30, one for TOS with the Model 30, and one for any 360 model 
greater than a 30 for OS. 

Each of the four student texts assumes some basic knowledge. 

This basic knowledge is primarily concerned with some very 
simple data processing concepts. One of the ways the aspiring systems 
operation student could have acquired these concepts is by having worked 
in, or been close to, a 360 data processing installation. Some of basic 
concepts and knowledge are : 
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1. The relationship between input/proces sing/ output 

2. Hexadecimal numbering system 

3. Decimal to Hex (and vica versa) conversion 

4. Function and description of I/O devices and media 

5. Purpose and function of Channels 

6. Relationship between compiler, source program, and object 
program 

7. Importance of documenting the jobs to be run 

What if the systems operation trainee doesn T t have these concepts and 
knowledge in his repertoire? The answer is, TT He enrolls in the programmed 
instruction course Computing Systems Fundamentals or CSF for short fT 
CSF is a major revision of the PI course called BCS which was released 
for use in 1964. CSF is concerned only with system/360 topics whereas 
BCS addressed the entire IBM computer line manufactured in the early 
nineteen sixties f BCS you may recall, required somewhere between 30 and 
40 hours for the student to finish. On the other hand the entire CSF course 
requires 15 - 20 hours. 

Whereas the entire CSF course consists of six units, the required pre- 
requisites for a systems operation trainee are Units I, IV, V, and VI, 

Unit I provides the student with a basic knowledge of problem solution, 
numbering systems, and conversion, computing devices, and 1/ O media. 
Flowcharts, decision tables, programming principles, and programming 
languages are discussed in an introductory manner. 

s. 



Unit IV discusses the process of creating a program from previously prepared 
decision tables and flowcharts. Short sample problems are used to show the 
development of programs in COBOL, FORTRAN, RPG, and PL/l. Also 
presented is a brief introduction to program compilation. Unit V discusses how 
the computing system (CPU, storage, I/O devices) solves a data processing 
problem. Information is traced through input devices, processing it, and 
finally as it emerges from output units. Numbering systems, I/O devices, 
storage devices, and processing units are illustrated and discussed. 

Unit VI is devoted to the procedures for collecting and packaging the 
documentation created during the programming and testing of a data processing 
problem, and the documentation required for operations. 

The amount of time required for a student to finish these four units varies 
from six to 14 hours. 

You've probably been wondering about Units II and III: Unit II concerns 
"Defining a Problem" and Unit III is about Analyzing a problem. Although 
these two units are primarily targeted for a programmer or systems analyst 
trainee and not absolutely essential for a systems operation student, we 
recommend that if time permits, the student take these two units. To 
elaborate a little, Unit II concerns problem definition in detail. The student 
is shown methods for determining input and output data requirements as well 
as the calculations required to solve his data processing problem. Sample 
I/O documents are discussed throughout the text. Unit III is about the use 
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of decision tables and flowcharts. Sample problems are analyzed by means 
of decision tables and are flowcharted using the standard flowcharting symbols. 

c; 

We in IBM Education appreciate your concern with conservation of time. 

That is why Units II and EI are not mandatory but we do strongly 

recommend them. If the systems operation student does take these two 
units, he will have a better understanding of the steps involved in producing 
those computer programs for which he'll be responsible in his role as an 
operator. 

(21) Now let's take a look at the systems operation student texts. The three 
texts for the Models 30 and 40 DOS and Model 30 TOS are identical in 
organization. Section 1 is an introduction to the System/360 computer. 
It can be classified as a review of CSF. Section 2 describes the role of 
the operator. It also very appropriately tells what the role of an operator ^ ^ 

is not. One other major topic of Section 2 concerns a description of the Programs 
to be run and the Run Book. Section 3, Tf Sample Programs TT consists of 
detailed step-by-step procedures for getting the components of a system 
operational. A description of sample programs on sample run sheets are 
used to give cohesiveness to the step-by- step procedures. Section IV is 
devoted to DOS/ TOS terminology and how the operator communicates with 
the supervisor. Included in communications is a discussion on I/O device 
assignments. Also discussed in Section 4 are numerous messages that the 
operator may receive and what actions might be taken on these messages. 
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After the student has finished the text, he should perform the appropriate 
systems exercise. This exercise will provide directed experience in 
operating I/O devices, interpreting operator messages, and issuing 
commands. The exercise requires from 1/2 hour to 1 hour. 

For Systems Operation Model 40 OS, the organization of the text is 
somewhat different. Section I is an introduction to the operating system - 
specifically, the function of the job scheduler. When the student has 
finished this section he is able to define such terms as Reader/interpreter, 
Ihitiatoi/'Terminator, data sets, Volume Table of Contents, DASDI, Job 
Control Cards, data set disposition, and, IPL. Section II which is entitled 
hardware familiarization is basically the same as T 'Sample Programs M for 
DOS. Section III "System Exercise" describes the OS message format, 
lists the publications "Messages and Completion Codes" and "OS 
Operators Guide" and how they are to be used, and, a description of the 
exercise. One half to one hour of time is required for the student to run the 
exercise. 

Now let's turn our attention to the courses recommended for the personnel 
who perform the operation control tasks. 

The initial course the student takes may be one or more of three: 

1. CSF (which has already been described) 

2. S/360 Introduction 

3. Fundamentals of Programming Languages 

S/360 Introduction is a 5 day class in the education center. The major 
objective is to have the student able to describe the functional characteristics 



and general principles of operation of the S/360. 

Fundamentals of Programming Languages is also a 5 day course and is for 
people with no data processing experience. It is primarily a CSF review 
and a description of the various programming languages with analyses of 
programs written in the different languages. 1 

If the installation is to transmit and receive data via terminals and common 
carrier transmission facilities, it is recommended that the operation 
control student attend the 1 day Data Communications Concepts course. 
Here he will find out^data communications can effect the operation of the 
data processing installation. 

The Problem Oriented languages are COBOL, PL/l, FORTRAN, and RPG. 
Some of these courses are currently available in both classroom form and 
PI form, viz v FORTRAN and COBOL. In general, RPG is available only 
in PI form. Although PL/I is currently being taught in education centers 
only, it will be available in PI form within the next 6 months or so. 

The Assembler language coding course is also available in either form. 
For those students who study ALP in PI form, there is a 3 day hands-on 
wrap up class available at the education center. 

The facilities class teaches the student how the operating system functions 
and what facilities, in the form of pre-programmed routines, are available. 
This includes the selection and use of utilities and the requirements for using 
various levels of Access Methods. The DOS/TOS Facilities class lasts 
for 3 days whereas the OS version is scheduled for 5 days. 



The System Generation (or Sysgen) course covers the considerations for 
generating a system when provided with the following items: 

1. Released tapes from PID 

2. Sysgen manuals 

3. The machine configuration and operating system options or 
features to be included. 

The last item is sort of misplaced. It belongs of course just after S/360 
introduction. This is where it will be placed in the future* 
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SESSION NUMBER T.4.1 

OPEN BOARD MEETING 
SPEAKERS 

JAMES STANSBORY, PRESIDENT 



TRANSCRIPTION 



OPEN BOARD MEETING 



COMMON - 7 SEPTEMBER, 1967 



The transcription below indicates that we have much to learn 
about procedures for taped sessions * I think that the idea is 
good; it's the only way to get the verbal information at these 
meetings into the proceedings* 

Many of the questions from the floor could not be understood 
(on the tape); comments were generally clear / since most of 
those used the floqr microphones. When I could understand 
or remember the gist of the question, I have put it in; in some 
cases, I have reconstructed the question from the reply. In a 
few places, I have been forced to delete passages; the context 
was not clear. 

In the future, we will have the floor mikes checked before we 
start, to eliminate the feed back that was present at Cincinnati* 

The rest is up to you. Name, rank, and serial number, please, 
and - use the mikes. 

The transcription follows: 
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CHAIR - 

This is not exactly an Executive Board Meeting, in the sense that 
we don't vote on business, but we do have the Executive Board up 
here as targets. We also have some things that we'd like your 
opinions on* Some feed back from the members - and it's a 
chance for you to bring up any gripes or complaints , pats on the 
back or anything else that you think may be appropriate. I'd like 
to say before I start that there is some trouble with the mikes . 
They must be pushed to talk. There is a switch on each one of 
them* Turn on the switch whenever you have anything to say* 
There's a report that I will present tomorrow at the Contributed 
Program Library Session on the 360 Contributed Program Library. 
This is a joint COMMON, SHARE GUIDE proposition. The minimum 
standards that have been distributed by PID do not represent 
COMMON'S standards. They are minimal standards acceptable to 
all user groups. We're free to exceed them in anyway we want to. 
Just not contradict them. 

Second item of business that I have - COMMON has been asked to 
participate in a Contributed Program Library Catalogue sponsored by 
the Joint User's Group and ACM. The Executive Board is in favor 
of this. What it means is that the programs in the library of any 
participating group would be part of a composite catalogue of all 
User Group Program Libraries, regardless of the manufacturer and 
machine affiliation. At present the ACM is talking about a sub- 
scription price of some $3 to $5 a year for a quarterly catalogue * 
You don't have to subscribe if COMMON participates - that's up 
to you. But I would like to know how you feel about our making 
the COMMON Library Catalogue a part of this composite Contributed 
Program Library catalogue. First, is there anyone who wants any 
further discussion, explanation of how it works, or anything of that 
sort? Have you seen anything on it, heard anything about it, any- 
thing else* Comments from the floor please. 

QUESTION - What would be published? Titles, authors - 

ANSWER - Titles, authors, abstracts - any program entered in that 
catalogue would be available to anyone regardless of 
user group affiliation. 
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QUESTION - How available? 

ANSWER - On order - the orders would be handled through your 
User Group, so in practice they are restricting it to 
members of organized user groups , but it would be 
available* There was a stipulation that a reasonable 
reproduction cost could be charged. 

The general idea, frankly, is that COMMON'S Library, along with 
those of several other user groups, is winding up in other catalogues, 
anyway* Such things as COSMIC and some of the others. We feel 
that we wouldn't be losing anything by making our library entries 
available. We do feel that we might be gaining something in having 
the information about the other User Group libraries. This would 
not affect the COMMON Library catalogues in any sense. The only 
additional thing that would be required is that someone who enters a 
program under these circumstances would have to fill out two submission 
blanks* One would go to PID, the other, without the program materials, 
would go to the Contributed Program Library liaison group committee. 
We are not promising to retro-fit existing libraries* If you don't 
want a formal vote on it, we don't need it, but I would like to have 
some opinion as to what you think of the idea. In the back, please 
and you may have to use the mike - 

QUESTION - How do SHARE and GUIDE feel about this? 

ANSWER - At the Executive Board level, SHARE and GUIDE are both 
in favor of this* I don't know if they have had a resolution, a vote 
on it, because, frankly, we do not have a response from IBM yet 
as to their willingness to participate. They promised such a response 
by, hopefully, the first of October* That's the reason I am asking 
for the feed back at this time* 

FLOOR - 

I think I could express the opinion of many of us here that this idea 
could be considered twofold - one, we have a centralized way of 
obtaining information and, second, with this type of catalogue, and 
the whole combination of papers being presented in one place, we 
could all have these papers available when we enlarge, let's say, 
to different systems* We're a 1620 user now, and have a 360 on 
order. I'm sure that many of you will express the same opinion. 
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I'm throughly in favor of it* 

I would like to add one comment to that* On the Contributed Pro- 
gram Library, COMMON'S Contributed Program Library, there will 
be separate catalogues for the 360, the 1800 and 1130 , and the 
1620. A user will receive the Library catalogue corresponding to 
his machine type* The 1130 and 1800 catalogues are combined* T 
The official rule is that the user will receive only his own machine 
type catalogue , so you normally wouldn't know if you were a 1130 
user what was in the 360 library without some such procedure as 
this* Incidentally, you can get the catalogue for another machine 
type by convincing your branch office that you need it* 

QUESTION - Wouldn't the submitter have to sign a disclaimer? 

ANSWER - They do have to sign a disclaimer when they send it in. 
I mean now. 

QUESTION - Just from a legafc, point of view - Would the individual 
whose programs are now in the library have to be con- 
sulted on this, before we make any committment? 

ANSWER - They had to sign a disclaimer when they sent it in. It 
has always been required* 

FLOOR - 

The disclaimer gives any third party the right to reproduce the program 
and give it to anyone they desire. 

CHAIR - 

AND I might add that IBM does exactly that. Apparently , they are 
legally obligated to not use the Program Library as a means of sales 
advantage. As a consequence , any requester can obtain a copy of 
any program in our library, regardless of whether or not he's even 
using an IBM machine. These are the present rules. 
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May I ask for a vote ~ a show of hands - as to those who would 
agree that we should participate* Very good. Thank you. 
There was to be some discussion of our proposed by-laws. How 
many people have read them enough to comment? They are published 
in CAST 7 which about half of the people received/ and there were 
additional copies made available here. 

FLOOR - 

No time to read them. 

I know it, but this is the last chance we'll have for discussion. 
Would you like a run-down from Laura as to the general changes 
we're making? 

IAURA AUSTIN - 

I think generally you'll find that there are relatively few changes ex- 
cept for wording* I'll just briefly go through them here, and see if 
I can pick them out. I wasn't prepared to do this, and I haven't a 
marked copy here . 

We did change it to include the new machine types. We've changed 
the name throughout the by-laws from 1620 User's Group to COMMON, 
We've included the machine types that have since been made eligible 
for membership in COMMON. The purpose and framework of the 
organization remains the same as it was. In loss of membership, 
there has been a change, because we're doing away with the regional 
structure. Where we used to have two meetings in each region each 
year, we voted to cut it down to three meetings a year* So we've 
had to change our requirements for attendance at meetings. If an 
installation is unrepresented at four consecutive meetings you will 
be removed from membership* This should give you a period of 
about 18 months to make a meeting and still maintain your membership. 
We've added one other stipulation, so that we can keep our mailing 
list up-to-date* Each year, the Secretary-Treasurer will send out 
a registration form which registers your correct address , your machine 
type/ and so on* If this is unreturned after two consecutive mailings, 
(we mail it, and if we don ! t get any answer, we try again) then you 



Page 5 



will be removed from the rolls ♦ Now, on that mailing, I shouldn't 
say we'll mail again if we don't get any answer. If the mailing is 
unreturned, we will mail again to the installation, without an 
individual addressee , because the installation maintains the member- 
ship, not the individual* Also, any installation failing to respond 
to two consecutive mail ballots will be removed from the membership. 
We've provided for abstentions to be counted as voting. If you 
wish to abstain/ don't just throw your ballot in the waste basket. Re- 
turn it, because you will be counted as having returned a ballot, 
even though you are abstaining from the voting. 

On the elective officers, there will no longer be regional Presidents, 
but they will be Executive Board Members at large ♦ The Executive 
Vice-President will be elected from the Board by the Board members, 
but the President, Secretary-Treasurer, and the Board Members will 
be nominated from and by the membership at large* In the elections, 
half of the Elective Board will be nominated every odd numbered year - 
or every year half of the Board Members will be elected, so we will 
not have a complete turn -over at any one time. That means that we 
will be having elections every year, instead of just every two years 
as now* Half of the Board members will be elected every year. The 
President and Secretary-Treasurer will be elected for a two-year term 
of office, as will the Board Members. The election for the President 
and Secretary-Treasurer will only be every other year, but there 
will be Board Members elected every year. 

There is some change in the wording on the Teller, so we won't have 
more than one Teller from any one installation. This was not re- 
stricted in the former by-laws . 

On a quorum, we've had a difficult time in the past. You may remember 
in New Orleans, for instance, where we had to declare the people 
elected because there wasn l t even a Quorum voting for the people, 
so we didn't in reality have an election. We are reducing what is re- 
quired for a quorum. So we've said that, for formal business at a 
meeting, at least one quarter of the member installations must have 
voting representation at the meeting to constitute a quorum. Then, 
for conducting business by mail, at least one-third installations must 
reply to amke up a quorum, and as I mentioned, abstention shall be 
counted* We hope it won't be so difficult to get a quorum anymore 
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on our voting . 

The decisions by committees have remained essentially as before/ 
about proposed standards, on meetings - this will remain the same* 
We have changed the by-laws to state three meetings a year, that 
they will be distributed geographically and temporally* This means 
essentially we will have a meeting in the East, Mid-West, West, 
Mid-West, East, Mid-West, West, so we will hit the Mid-West 
twice as often as the others ♦ We felt that this allows the East 
to get to both theirs and the Mid-West, and the West to get to 
theirs and the Mid-West* So this the plan for coming meetings. 

We've also changed, under distribution of information, that any 
material, except the membership list, which is distributed through 
any COMMON channels, is assumed to be non-proprietary. We did 
feel that the membership list should be considered proprietary to 
COMMON-. It will not be sent out just on request/ because we've 
had difficulty with people putting COMMON members on mailing lists , 
so we have restricted its use. Of course, in submitting a program, 
as we've already mentioned, you submit a disclaimer at the time, 
which does make it open for any kind of reproduction* 

You'll note that incorporated in the new by-laws is the proposal 
that was submitted last year regarding financing for Executive Board 
Members who must attend every meeting during the year. There will be 
some subsidization made by COMMON/ if necessary, to have a Board 
Member in attendance. 

We have also left it open that, if it is felt necessary in the future, 
we might put in a subscription feed for CAST, if the cost becomes 
prohibitive under our normal financing situation* As you know, the 
only way we receive finances for COMMON right now is through 
the registration at the meetings* We take the cost of the meeting, 
and then some additional to cover the expenses of COMMON. The 
issues of CAST that we have sent out have run us in the neighborhood 
of $1200 per issue of CAST. You can see that we are running into 
considerable expenses in operating COMMON, but we have felt, 
from the feed back we've gotten from the membership/ that CAST is 
well worth this* If we are to continue to issue CAST on a regular 
basis, and to include all the information we have in the past, we are 
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going to have to have some means of financing this. So we've 
left it open in the by-laws that, if deemed necessary, we might 
put in a subscription fee. However, this would be submitted to 
the membership for consideration before it was done* It's not 
going to be anything that is just railroaded through, I think that 
this basically covers the changes in the by-laws* Do any of the 
other Board Members think of any I have skipped over? 

CHAIR - 

Thank you, Laura < 

I would merely like to say one thing. I hope that the members see 
fit to approve these by-laws, because I don't want to spend the rest 
of my life running from the sheriff. Obviously, I am approving 
expenses of Executive Board Members to get them to these meetings; 
I'm not authorized to spend your money this way, but I am doing so. 

There was some question at Boston about a statement of finances. 
Chuck had to return to Dallas unexpectedly. Our present treasury 
is something like $4750. We will make in the neighborhood of $2500 
from this meeting. As far as the Executive Board is concerned, we've 
already stipulated that the registration fee for San Francisco will be 
$25, and you will get only one luncheon out of it. 

The feeling at Boston was that higher registration feed would be accept- 
able to the membership in preference to dues, and that a subscription 
fee for CAST would be acceptable in lieu of dues. They did not want 
dues inlieu of a meeting attendance requirement. As a comparison, 
SHARE has considered imposing a subscription fee for SSD; but the 
suggestion was voted down by the members. Every thing that they 
get from a registration fee is net - There are no group activities that 
are scheduled without charge. SCIDS registration is additional, 
and on a usage basis. SKIDS is, a SHARE organized drinking session* 
Six 'til two every night during the meeting. It l s very well patronized. 

In regard to the quorum, we felt that abstentions were legitimate votes 
for COMMON members. There are many of you new members who, 
for one reason or another, feel that you aren't qualified to make a 
decision, but are willing to go along with the majority,. Now, we've 
asked you to deliberately abstain. The vote on the by-law amendment 
that we proposed earlier was very much in favor - I think something 
like 80% - but there were not enough votes returned to establish a 
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quorum, so It was defeated* We're trying to get around that; 
but we didn't go as far as SHARE. In SHARE, if 20 ballots are 
returned from a mail vote, the majority of the votes determines 
whether the thing passes, because every installation has an 
opportunity to consider a mail ballot* I don't think that's quite 
legitimate. We didn't go that far. Are there any comments from 
the floor? 

QUESTION - How many is 25% of the membership? 

ANSWER - At the moment our membership is something like 1275 < 
We are not a quorum here ♦ 

QUESTION - Is the omission of machine requirements deliberate? 

ANSWER - It was deliberate. We'll accept anything from a 20 to 
a 91. 

QUESTION - I would like to ask one question. Is there any provision 
in the by-laws now for bonding of either the Secretary- 
Treasurer or the Local Events Chairman? I know that 
Mr* Mauldin is undoubtedly a very honest person. Dave 
Dunsmore is undoubtedly a very honest person, but to 
protect them and COMMON I would hope there would be 
some way of providing for a bonding of them oi* of anyone 
who must handle organization funds* I don't think there 
would be an organization that could operate effectively 
without some sort of a bonding procedure. 

ANSWER - I think you have a good point here on the Local Arrangements 

Chairman, and I know that Dave, himself, raised this question. 
It does not state in the by-laws, and perhaps should, about 
the Local Arrangements Chairman, but it does about the 
Secretary-Treasurer. It says he should be the primary fi- 
nancial officer of the group, and, as such, will be required 
to be bonded at the expense of COMMON*. I might add 
that Chuck Mauldin has been requested by the Executive Board 
to have himself bonded at the expense of COMMON for 
his own protection ♦ Further comments - 
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COMMENT - I think it has been rather the concensus of the 

people at this meeting that the by-laws as amended 
are going to be quite acceptable to the membership* 
I realize that it will take a mail ballot to insure this, 
but I think we could give you a show of hands here to 
indicate our approval 

CHAIR - 

Well, since the majority of you have not had a chance to read them, 
or at least so indicated , I don't think it would be too appropriate at 
this time, 

IN THE BACK - 

We don't need a show of hands # What we mean is just five minutes 
of people's time to take the time to mail the ballot* 

CHAIR - 

That is exactly right. I've forgotten exactly how many, but something 
like 250 ballots were returned on that by-law amendment. As I said, 
it was about 80% in favor of it, but there were not enough under our 
existing by-laws to establish a quorum* 

QUESTION - Can you give some indication as to when the ballot will 
be mailed and how long they will have to return it. 

ANSWER - Yes , The amended by-laws , the proposed by-laws , were 

published in CAST 7. About half of you, about 40% of you, I 
think, received them before you came to this meeting. The 
rest of you should find them when you get back. Under the 
by-laws there is a required discussion period - under the 
existing by-laws and under the proposed by-laws. We have 
to submit it to you, and we have to give you time to send 
in written discussion, if you wish, prior to requesting a 
vote. That written discussion and the ballot, together with 
Executive Board comments , will be published in CAST 8 , 
which is scheduled for sometime around October 1 or October 
15 , You then have approximately a month to get your ballots 
back. Comments should come in very promptly, please, 
and we would appreciate favorable or unfavorable, We l re 
most interested in some idea of what you want. 



Page 10 



COMMENT - I HAVE read the by-laws * They look good to me, but, 

from what you said a moment ago, I would suggest con-* 
sideration of the question of the size of the quorum 
necessary to conduct business at a meeting* If , in fact, 
a group of this size is not competent enough to make 
decisions binding upon the whole , I think we have a much 
too conservative position expressed, and it might be 
appropriate to lower the quorum when we do have a chance 
to discuss back and forth, and each one adequately hear 
the opinion of everyone else* Now, secondly, I take ex~ 
ception to your interpretation of what I believe to be the 
argument presented at Boston* I do not believe there was 
a strong opposition to the payment of dues from this member- 
ship if it was rewarded by adequate, efficient administration. 

Thirdly, I say that, maybe because of what we said, 
planning and the conduct of this meeting has been vastly 
superior, and I say thanks to whoever it was* 

CHAIR - 

To some extent I can take credit for that, (LAUGHTER) 

No, this is the reason for my guilty conscience for subsidizing the 
attendance of sufficient Executive Board members to establish a quorum 
of the Executive Board at the planning meetings we had for this* I 
don't mean that I can take credit for the work. Work has been Dave 
Dunsmore and Jim Tunney, Laura Austin, Division Chairman, Managers, 
Eric Zielinskl of IBM. They are the people who must really take credit, 
but I think the Executive Board contributed a great deal to this, and I 
would like to have my guilty conscience sa/ved. (Clapping) . 

We do hope and expect a better run meeting at San Francisco than we 
had here. We are aware of the problem with the late agenda. They were 
mailed on time. The next ones are going to have to go out first class, 
which means more money. It is going to cost us about $1,000 for a 
first mailing about the 1st of October, a preliminary agenda about the 
1st of November, That's the reason for the deadlines that I mentioned 
at lunch. 
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IN THE BACK - 

Do you know how many installations we have represented here? 
How many people we have here? 

ANSWER - The people are approximately 450* The number of installations, 
however, is by no means anything like that. There are around 50 
attendees from IBM, and I know of several installations that have 
multiple attendees . I couldn't begin to guess, but somewhere in the 
neighborhood of 200 or 250 installations. 

FROM THE BACK - 

Couldn't hear 

CHAIR - 

I would like to have that in writing, please. To CAST. 
DICK PRATT - 

I'm not sure, maybe somebody can correct me about this if I'm wrong, 
but I believe the only way to get this provision in the proposed by- 
laws is to defeat them, and then propose a different set of by-laws 
with this change in it. If this is true, and I think it is, I would like 
to suggest to you that, if this is the only objection you have, and 
if your other objections are similarly minor, you approve the by- 
laws as they stand, and then propose these things as amendments, 
because we absolutely cannot operate legally under the present by- 
laws . 

CHAIR - 

Before we even comment on this - under our present by-laws we have 
to have two-thirds to approve these amended by-laws. If we get 
that done, then we can conduct business on a reasonable basis. That's 
one advantage . 

FROM THE FLOOR - SAM LYNCH, U.S. PRODUCTION CO. - 

1 agree with Dick , that if this is the only thing that prevents us from 
getting these by-laws, for crying out loud, let's get these, and then 
work on them. But how can we find out right now whether Dick's 
assumption is correct? You know, if it is, then I won't even bother 
writing CAST and making the suggestion, and I'm sure the gentlemen 
back there won't either, but can we find out now what the legality is? 
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CHAIR ~ 

Chuck Mauldln knows, and he's not here* (After I got home* It's 
two thirds of the membership in favor, to amend the by-laws) . 

In any case, from our existing knowledge, I think we'd better do it* 

DICK PRATT - 

The point is, I don't think there is anyway, either under the existing 
by-laws or under the proposed by-laws , to amend a proposal to be 
voted on by mail* You either accept it, or defeat it as it is stated* 
I think that's correct* 

CHAIR - 

I believe that one of the alternatives in mail discussion is to submit an 
alternative proposal, but then that must be discussed, so it would 
definitely delay it for two to three to four issues of CAST, which is 
sometime next Spring* 

FROM THE FLOOR - 

I don't want to delay this , but, Dick, you imply that the restriction 
is on the mail ballot* You know, this thing could be changed before 
it is mailed to us . 

CHAIR - 

It has already been mailed* 
FROM THE FLOOR - 

Not in the form of a ballot - in the form simply of read this • 
CHAIR - 

This form has been mailed - must be discussed, and then the ballot 
submitted. 

FROM THE FLOOR - 

O.K. In other words, the procedure has started, and we should not 
abort them, but carry through. I would certainly go along, I withdraw 
my comment for now* 
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FROM THE FLOOR - WADE NORTON , from Southern Service, Birmingham, 

I would like to ask the question if there is any way in which the 
proposed by-laws are not as good as the existing by-laws ? 

Whether we have reached an ultimate is not necessarily the question. 
Whether we have ever reached an ultimate is subject to some question 
in my mind, so would it not be better to go ahead and make progress 
in increments as we have been doing since we got our first computer ♦ 
(Clapping of Hands) 

FROM THE FLOOR - 

I have intermittenly received copies of CAST and various letters from 
COMMON f If we are going to mail out a mail ballot, let's please 
make sure that all the members receive a copy* Myself for one would 
like to receive a copy* 

CHAIR - 

All right, I can speak for Chuck on this* As you know, he has had 
some trouble with his installation. He l s still having trouble with his 
installation, but not from lack of support. He informs 'me that he has 
reduced his back log of mail from yea high, about four feed, to around 
three inches and that, within roughly two weeks, there will be a member- 
ship list complete with addresses, which includes every application 
that he has . I will not guarantee that there is no incorrect information 
in there, of course. There should be no problem with people registering 
or changing address , and not having it processed within a reasonable 
length of time* 

LAURA AUSTIN - 

I'd like to say that in the new members 1 meeting yesterday, some came 
up and said they had not received their mail* At that time, Chuck 
checked the list which he has, which is current as of last Friday, and 
all but one of the people's names were on there* We hope that things 
are in much better shape right now than they were a week ago* 

CHAIR - 

My reason for giving the two weeks delay was that Chuck also said 
that he has 75 new member^ names in Dallas, which are going in 
immediately to Pat Lonergan for the final up-dating on their membership 
list. 
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FROM THE FLOOR ~ 

I'm just wondering - I had problems here with Chuck! and it is 
possible when you have something like a ballot that it could be 
flagged in some way so that you know it needs immediate attention/ 
or urgent attention, and not be put in irith everything else in CAST. 
(Sorry - everyone talked at onee here) 

CHAIR - 

Well/ we assume that you would at least look over the table of con- 
tents ♦ We do try to segregate such items f as a matter of fact, generally 
not the front page, but we'll try to make it the back page, normally* 

FROM THE FLOOR - 

Different colored paper ♦ 

CHAIR - 

Different colored paper is a suggestion, I don't know whether we 
can do it or not/ but we can certainly consider it* 

FROM THE FLOOR - 

If it were just typed in upper case in the table of contents - that would 
tend to catch someone l s eye. Action is required. 

CHAIR - 

Well/ I'll get hold of Chuck after I get back to New York/ give him a 
call/ and suggest that he can possibly arrange to have an asterisk/ or 
some sort of indication/ put beside the item in the table of contents 
that requires immediate attention and your action* 

FROM THE FLOOR- 

If it's official action that is required of a member and this is pointed 
out — 

CHAIR - 

Something of that sort/ but I think I will have to insist that you do at 
least look over the table of contents . It is rarely more than two pages * 
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FROM THE FLOOR - 

I am wondering, as a suggestion, would it be possible to get regional 
responsibility for contacting the members in the local area to find out 
if contact has been made or just to remind them to mail this in. 

CHAIR - 

I might say that one of the reasons that we put that failure to respond 
to two mail ballots in there, is that if you don't pay attention, you 
aren't going to be a member very long. That won't affect this vote, 
but if you pass these by-laws that provision will be in there. 

FLOOR - 

In reply to that suggestion, it's my opinion that what we need is 
responsible individuals who will take action without being led by 
the hand, and not somebody that you have to constantly follow up 
and follow up, 

FLOOR - 

He might have been referring, tho, to those people who might not have 
received it because they weren't on an address list. 

CHAIR - 

I might add in connection with this that quite a few of the local in- 
stallations, Long Island Lighting for one, did not receive an agenda 
till very late, because the third class mail service on Long Island 
is lousy. Jene Lewis called me, and I find that other members do 
the same thing; they will tend to call the nearest Board Member, contact 
like that, if they know that something is coming up. You certainly 
should know because you would have to miss two copies, the one 
that carried the item being discussed and the one with the ballot. I 
think that to some extent it is back to a matter of installation responsi- 
bility. If you don't get something you should, then find out why. 

FLOOR - 

May I make a suggestion - If you don't get CAST 7 write to Chuck. This 
way you will be sure of getting your ballot. When you get back to 
your installation, if you haven't got CAST 7, then write a letter to 
Chuck right away so you can find out what they trouble is and be sure 
you get your ballot. 
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CHAIR - 

Which takes care of only the people here* 



FLOOR - 



That was tried four weeks ago and I still haven l t gotten an answer 
back* I sent a 'telegram* 



CHAIR - 



To where? Terre Haute? Or Denton? 



FLOOR - 



Denton ♦ 



CHAIR - 



He's not here to defend himself ♦ I don't know the circumstances* 



FLOOR - 



We have a problem apparently to get this particular ballot approved 
by a large majority. Would it not be worthwhile to make a special 
first class mailing of this ballot only in an effort to get this back? 
Otherwise,, you are going to have multiple mailings/ anyway, and you 
are going to wind up with the same cost. It would be roughly five 
cents apiece if you do it that way 7 rather than putting it in the next 
CAST or some other method. This is a critical point. Once we get 
past this our quantities are down. We don't have to have the same 
reply. 



CHAIR - 



CAST goes out first class in any case. 



FLOOR - 



I know, but it is lost. 



CHAIR - 



A separate mailing is certainly something 
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FLOOR - 

I went back. I didn't know I had it, I went back and looked in CAST 
and found it. I had gone right past it the first time and you l re not 
talking to people who are here. We'll all look for it. We ! re not the 
majority, by a long shot, 

CHAIR - 

Well worth considering. Thank you. 
CHAIR - 

The gentlemen in the back . 
FLOOR - 

You shouldn't have to go through a special first class mailing just to 
get you to read the appropriate place in CAST, or the appropriate ballot. 
That's what Cast is all about. This is what we are trying to do - save 
a little bit of extra money. For heaven sakes, please read it page by 
page. Please read the letters from Joe Doakes to see what this is all 
about. 

CHAIR - 

I have a gentleman down there. 
FLOOR - 

I just want to say in this case, as in so many cases, working with the 
practical situation is going to require an awfully lot more than working 
with the theoretical one. We can look out for this, but what about the 
ones who are not here? 

CHAIR - 

An there happens to be about 800 to 900 installations that are not re- 
presented at this meeting. 

FLOOR - 

How many must vote to establish a quorum for this? 

CHAIR - 

This has to be a mail ballot, which means two-thirds, something like 
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800 or 900. However, the present by-laws require the approval of 
two-thirds of the members. They would all have to vote yes* 

FLOOR - 

You have 300 people here and there are roughly 500 « 
CHAIR - 

We have 300 people, but there are not 300 installations represented 
here, I don't believe. 

FLOOR - 

Nevertheless, the first class mailing will call attention to it. This 
has developed into a very difficult situation right now to make our 
initial requirement for a quorum. 

CHAIR - 

Thank you. 

FLOOR - 

A very interesting point is that, if we can get this one ballot passed, 
we can kick out all the dead beats who don't answer, and then we'll 
have a quorum again. But in the meantime , we have some number of 
dead beats who never answer. O.K. so they don't read CAST so we'll 
save some expenses by not sending them CAST or anything else after 
this. We have to get this passed, because for now we can't kick them 
out for not answering the ballot* 

CHAIR - 

I agree that almost any measures are warranted to get some response 
immediately. 

FLOOR - 

I recommend you that you put this first class mailing to a vote. 
CHAIR - 

I hear your words, and, personally, I am inclined to agree with you, 
but I will have to review our financial status. About 200 for postage, 
plus some labor charges/ of course. Folding and stuffing the envelopes 
and so forth. 
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FLOOR - 

Suppose we don't get back enough votes, what happens then? 
CHAIR - 

Then we keep resubmitting it. 
FLOOR - 

I apologize immensely before I even start, but I'm going to say it. 
We are a society of professionals in Data Processing. We're supposed 
to be experts in fine procedures and good systems. We are in charge 
of installations spending lots of money for high powered equipment. 
Let's not be penny ante about running our own organization. I detect 
this in all together too many responses of the Executive Board and 
elected officers, and, to my chagrin, I hear it from the floor. Let's 
spend $60. Let's spend $1,000. Let's get an organization that works 
for our benefit. 

CHAIR - 

At the moment, if we go wildly over budget, the registration for San 
Francisco will not be $25 - it'll be $35 . (Laughter and clapping) 

FLOOR - 

We 1 11 mail them out first class. 
CHAIR - 

They will go out first class . CLAPPING 
CHAIR - 

There were two other hands raised. Same comment, or generally so? 
Further comments ? 

FLOOR - 

I just wanted to pose a question, Jim. Is there any reason why or 
why not our registration fee could not float between certain bounds 
depending upon our particular situation and expenses 

CHAIR - 



It does now. 



Page 20 



FLOOR - 

I .didn't know if we were illegal in this respect. 
CHAIR - 

No i we aren't* We decide how much we need. We have to try to get 
it out of meeting registration. That's the reason we left in our amended 
by-laws the ability to impose a subscription feed on CAST. It is a 
little unfair, because of this fluctuation in the registration feed. It 
might always happen, we'll say, that one particular region wound up 
having to pay the highest registration fee. We are considering other 
methods of financing. Definitely. But at the moment we can't even 
legally impose an subscription fee for CAST. Are there any comments? 

FLOOR - 

I just wanted to second again what the last gentleman said* We spend 
many, many thousands of dollars on computers* Man-time cost thous- 
ands of dollars. Half an hour of computer time is not really thought 
of as being expensive. Half an hour of computer time is $25 or $30. 
Please don't think small. We've got bigger things to get out of this 
instead of worrying about $10 more in registration fees. 

CHAIR - 

Part of our problem here is there are a lot of 1130 installations 7 and 
1130 installations are one and two man installations* And they do 
have cost to worry about. They are in the same fix the 1620 group 
was years ago. I'm talking about the majority now* 

FLOOR - 

Neither the typist nor I could get this clearly enough for transcription. 
Comments about the Boston meeting. JCS 

CHAIR - 

I know this. It was a very poor meeting* 
FLOOR - 

I understand that people just sat and talked* I agree with this 
gentleman - if it's needed, we should go ahead and attempt to get 
our finances straightened out now with a higher registration or with 
some nominal charge for CAST* For instance fifty cents a year* 



Page 21 



CHAIR - 

At the moment there is a subscription price for IBM employees who 
want to get extra copies - you know - for branch offices - things 
like that. This is $15 a year and that is about a break even price , 

FLOOR - 

About a $1 an issue. 
CHAIR - 

Approximately that, 
FLOOR - 

Let's charge it, then. 
CHAIR - 

At the moment, as I say, under our existing by-laws we cannot charge 
for them* We can do it only if we are supply extra copies or something 
of that sort* Copies other than the one that a member installation is 
entitled to, 

CHAIR - 

(Section deleted; couldn't transcribe), 
FLOOR - 

It seems to me, Jim, that the message is clear that you ought to spend 
the money to put on a quality program, and most of the people are going 
to pay the money. The people who don't aren't going to recognize the 
importance of operating their own installation, whether it's a one-man 
installation, or what it is , Let's spend the money and do a high class 
job, 

CHAIR - 

We agree with that and we did it* And as I said I have a guilty con-* 
science* 
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CHAIR - 

O.K.. let's wind this up* You people have indicated that you are 
largely in favor and 1 am quite pleased/ I might add/ with your 
response* Is this pertaining to this? 

FLOOR - 

American Electronic Labs - I heard you talking about the COMMON 
meeting in Boston about not being well run* That was the first COMMON 
meeting I ever attended, and I don't agree with you at all* In fact, 
I disagree violently. This meeting has been run very weel, but, 
to me in Boston, whether it was planned well or not, it ran very well. 

CHAIR - 

I agree* It wasn't planned very well, but it ran well, 
FLOOR - 

It got this meeting off the ground. A lot of things that happened here 
resulted from that, sol see no reason for anybody to say to themselves - 
you know - we have to look back at Boston, and say we didn't do a 
good job* You did. I was very happy with it. In fact, I probably wouldn't 
be here if not for that* 

CHAIR - 

And we didn't do a good job here in my sense of the word, and we 
expect to do a better one in San Francisco. 

Bill Lane, incidentally, needs a Local Arrangement Chairman for San 
Francisco. He's handling both ends of the deal, but he's nearly 200 
miles from San Francisco ♦ He can't work as Program Chairman, and 
as Local Arrangements Chairman. He shouldn't be working as either, 
but we feel that we can't swap Program Chairmen at this late date. 

FLOOR - 

I feel like the mandate is clear to those of us who are here, altho 
we can't vote ~ we could vote, but you would tell us that we don't 
have a quorum - so why don't we do that? (Comment concerned 
registration fees for San Francisco). 

CHAIR - 

Never mind* I think the majority is quite clear. We hear that, and 
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will consider that in discussing our San Francisco plans tomorrow* 
There will be an Executive Board Meeting at lunch to discuss the 
results that we are hearing now. Bill Lane has some comments* 
He's the guilty party for San Francisco. 

BILL LANE - 

I hear all of these things. We haven l t discussed the raise in the fees, 
but I can almost guarantee they are going up* The first mailing for 
the San Francisco meeting will contain approximately the following 
material, and will come out approximately October 1. It will contain 
three hotel registration cards. Please get them in. It will contain 
a blurb about how great San Francisco is; I think it is the best city 
in the world. I'm biased. It will have some information regarding 
the wive's program. We'd like to see a lot of wives out there. You 
ladies bring your husbands along ♦ Maybe we can send them out to 
North Beach. It will have some general information on the meeting, 
and will be about October 1. We expect, hope, and ask for returns 
on this information. We would also ask that if you have some questions, 
if you have some items that wish to be discussed, that you get to 
your project leaders, or to your Division Chairman, before you go 
home tomorrow, so that they will get on the agenda. I am not about 
to put anybody's "non 11 -return on .the agenda. I'm not going to make 
an agenda for you. A slot will be there, but information will be 
printed only if it is submitted. And submitted means by deadline * 
There will be a second mailing approximately (both of these are 
going out first class; that's already been decided). November 1 
which will contain, for those of you who did not get your hotel 
card in, another hotel card, and the agenda. This is the tentative 
agenda. The final agenda will' be handed out at the meeting. Please 
get to your Division Chairman today. If you can't find him today, 
corral him tomorrow. If you can't find him tomorrow, the names of 
the various people are in the agenda. If you can l t find anybody else, 
get the information to me, and I will send it to your Division Chairman, 
but let's get it out there. San Francisco can be a great meeting* 
In the past, the Western regions have had a slightly lighter attendance 
than we ha<i in New. Orleans ♦ I was not at the Boston meeting* A 
lighter attendance does not necessarily mean a poor meeting, and, 
while we anticipate maybe a lighter attendance this time, start twisting 
arms right now - you know the boss - tell him how you have to go 
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to San Francisco* We will have a tour for you of IBM's campus 
facilities in San Jose* IBM has a gentleman who has offered to 
arrange bus service , and I'm going to take him up on that* There 
will be available at the Data Center , and possibly other places, 
computers that include the following: 1130, 360-20, 30, 40, 44, 
50, and I think there is a 65 down there, isn't there? All you IBM'ers, 
You don't know? What's the matter with you guys? Well, anyway, 
there's up through a 50 down there * There are Data cells; you know, 
that's the little tweezer gadget ♦ Anyway ; the San Francisco Data 
Center is well equipped* There are a number of pieces of equipment 
there* You will be allowed to reserve time in the evenings to play 
games, if you want. You will take care of this, wpn't you, Pat? 
It has been suggested, I think casually , that we also, for those 
of you who are interested, hold a tour of the Napa Valley . I don't 
know whether any of you know what the Napa Valley is , but that's 
the greatest wine-growing country in the world, and there are lots 
of wineries out there* This is by preference at a later date* Anyway, 
San Francisco, the 11th through the 13th of December. We're going 
to see everyone of you there. It's the last month of this year. 
Shortly after Thanksgiving and before Christmas. You can get all your 
Christmas shopping done in San Francisco and things like that. Get 
your papers in. There is something to be said about an unstructured 
meeting, an unplanned meeting, but as an engineer it bugs the heck 
out of me. I want to see some programs, and you are the people who 
are making the programs* O.K. ? Thank you. 

CHAIR - 

After that sales talk I give up, but I agree with Bill. There will be 
a report by me on the 360, 1130 and 1800 CPL minimal standards 
that have been distributed by PID for those machines ♦ The 1620 would 
not have received a copy of them* Again, these are minimal standards* 
I'll tell you what we came up with, why w^ chose them, and what 
SHARE'S reaction to them was at the Program Library Meeting tomorrow. 
I'll try to make that the last part of the meeting, in case there are 
any conflicts with other meetings* If any of you are interested, or 
have any ideas at all, about what you want to do with the Program 
Library - fine. Otherwise, instructions are adequate. Any other 
business*? 
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FLOOR - 

You have listed on your agenda discussions about IBM - customer 
relations. For those of us who are first attending, I'd like to hear 
what you have to say about the financial relations. 

CHAIR - 

Fine. IBM publishes our proceedings for us at the moment. They 
have suggested that this would be a legitimate fiscal responsibility 
for us, but quite agree that we are not in position to take it over 
at the moment. We have to have a reserve in the treasury before 
we can do that* They maintain our Program Library; there's no question 
about their continuing to do that. CAST and the Newsletter, which 
preceeded CAST, and is now part of CAST, have both historically been 
published by COMMON. IBM provides certain help at these meetings 
in the sense of IBM personnel - They give us an indirect subsidy in 
the shape of IBM people attending the meeting and paying the re- 
gistration fees. There is no direct subsidy from - Oh, Yes, the coffee 
breaks, audio visual equipment, special equipment of that nature, 
signs - the administration facilities , for instance, they have a 2400 
Zerox in there for us, badges, material of this nature - they do pay 
for us. I should say that there is no cash subsidy. They help us 
negotiate with hotels* 

JUDI GREENE *- 

I would like to say thank you to the people of IBM* Those of us who 
were at the 1130 meetings - we got a lot of very important information/ 
and a good deal of it was impromptu; we appreciate it very much - 
those people who did speak to us. 

CHAIR - 

Incidentally, since there are new members present and Arnold Smith 
was not introduced at the new members 1 meeting, or at the General 
Assembly: stand up, Amie, and take a bow - you and Pat, both. 

On the transportation to the boat - there is a map illustrating the route/ 
something like five blocks* I'm told they are rather long blocks, 
but we had planned that most of the people would walk down there. 
Cab/ that's fine* 
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FLOOR - 
Can we park? 
DAVE DUNS MORE - 

There is parking on the wharf down there. The boat is to be loaded 
between 5:30 and 6:30. Cocktail hour until 7:30 , and at 10:30 we 
will be back, I will try to arrange for cabs to be present in that 
general area / because it is an up-hill walk back. 

CHAIR - 

If there are no other comments/ Til entertain a, motion that we adjourn. 
Second? All in favor , move* 
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INTRODUCTION 



Using R.P.G. for FUN and PROFIT ? Prior to the System "360" 
Happy R.P.G. users were few and far between, but we feel it 
has come of age and if given a chance can find its place in any 
installation. The intent of this paper is to encourage the use 
of R.P.G* and to pass on the good points and weak points we have 
found through eight months of use. 

There are six different coding sheets used in preparing a 
program: File Description, File Extension, Line Counter, Input, 
Calculation, and Output. (See Attachment 1 for examples) The 
R.P.G. manual has a section for each sheet which covers all the 
entries for it. We have found no drawbacks in using coding forms 
over free form which we had. been used to. 

On our first programs, we seemed to be bumping heads with the 
I/P, calculation, 0/P cycle that is the fixed logic of an R.P.G. 
program. (See Attachment 2) We felt restricted because we 
couldn't control the occurrence of the I/P cycle. We have found 
that by making card., disk, and printer layouts and then planning 
our programs from these the logic fits many applications very well. 
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I. COMPILER EFFICIENCIES AND DEFICIENCIES 



To date we have found only one logic error in the compiler. 
If the same name is used with different tag operations on the 
calculation specifications, it is not diagnosed and. the last 
one encountered is used* This is similar to duplicate statement 
numbers in Fortran or duplicate labels in Assembly Language. 

If the level break field of the first record, of a file that 
has level breaks specified, is zero or blank, the level break 
indicator is not on for the first detail cycle. 

The compile time for programs will depend mostly on your 
peripheral gear. With a (1443 Printer, 1442 Punch, 2501 Reader) 
a (441) source statement program can be compiled and, cataloged, 
in five minutes and seventeen seconds, (60) source statements or 
less takes two minutes. If you take object decks, the speed of 
the punch will be the controlling element of compilations. You 
will get larger object decks from R.P.G. than you experience in 
other languages because all fields are initialized.. To date, for 
a 32K machine, the largest object deck we have generated, is 500 
cards and the smallest is 100 cards. Because of the speed of the 
compiler, we have found it economical on some jobs to use a com- 
pile and execute rather than maintain a source and. object deck. 



II. LANGUAGE PROBLEMS THAT CAN BE SOLVED AT SOURCE LEVEL 



Our early programs were frequently canceling due to reading 
an undefined record type. The HO indicator is used for canceling 
a job for this reason and eleven others, so the programmer has 
no way of deciding anything based on HO. We have found that 
leaving the record identification code blank on single record 
type files and using a blank specification as the last one of 
multiple record type file and then checking record type on the 
calculation specs and taking action from resulting indicators 
used on input gives the programmer good control. (See Examples) 

We found it was very difficult to obtain a skip to a new page 
and put out headings after level breaks by trying to condition 
headings on overflow alone. By using the level break indicator 
at detail time in a (or) situation with overflow - Group Printing 
Feature - we have eliminated this problem. (See Examples) 

We found we were getting some extra pages in reports on which 
we were doing an internal line count. This is because if a print 
file has been specified and an overflow indicator is not used as 
one of the first three indicators of any 0/P line the compiler 
generates an automatic skip to channel one on overflow. We elim- 
inated this by using a dummy line that is never executed with 
overflow as one of its indicators. 

Also there were some unexplainable lines at the beginning of 
our reports. These were the result of the program looking for 
first page output and allowing any detail conditions met to print. 
We find if you have to use a not condition for printing a detail 
line, it must have NIP specified also to stop its printing on 
first page 0/P. 

3*3 



We noticed that printer output was not at full print speed 
in programs that had little calculation to slow them down* We 
found that this is a result of the program having to wait on a 
line to finish printing in order to check overflow. The use of 
the line counter specification as an internal carriage tape 
gives you maximum printer efficiency. Unfortunately, it was not 
working properly prior to release 11 of D.O.S. 
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III. CODING TECHNIQUES WE HAVE FOUND TO 
PRODUCE MORE EFFICIENT PROGRAMS 

The GO TO operation on the calculation specification was 
said to be one of the improvements over 1400 R.P.G. We have 
found it to a powerful instruction for two reasons. One is 
probably obvious that is the ability to branch backwards in the 
calculation coding. But an additional use we find of great value 
is that it gives you the ability to create your calculation in 
modular blocks of routines to handle specific parts of a problem 
rather than use a resulting indicator to allow or inhibit the 
execution of coding. We found that the latter approach not only 
produced larger and less efficient programs, but was extremely 
confusing to write and maintain. (See Examples) 

The total time block of coding is entered only once regardless 
of the number of level breaks that have occurred. All total time 
calculations that can be done are executed at once, and then all 
total output is done. 

A second improvement over 1400 R.P.G. is the use of multiple 
input files. We have found several uses of this feature. One is 
specifying the same file with two different names so you can pro- 
cess it twice in the same program. An example would be where 
totals are needed to calculate percentages of detail lines . If you 
specify the same file as a primary and a secondary with matching 
record, R.P.G. will give you the detail records for a group twice. 
You can add them as they are processed as a primary file and then 
calculate percentages and print them as they are processed as a 
secondary file. 



IV. EXECUTION PROBLEMS CAUSED BY D.O.S. DEFICIENCIES 



When a disk file is specified as blocked and a full block is 
not generated one time a record with a key the length of the 
data is generated and a blank data record written after it. 

If a utility created a disk file and it has not been sorted 
by sort merge, an R.P.G. program will not recognize the end of 
file written by the utility. 

When a file has been specified as an update file, the last 
record to be updated is not returned to the file. 

All of these problems have existing apar T s to correct various 
levels of D.O.S. 
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V. CHAINING (INDEX- SEQUENTIAL FILES) 

If file is unblocked , make the input record size ten bytes 
Larger than the record length to handle records from an inde- 
pendent overflow area. 

Be sure to include a LBLTYP card when link editing the pro- 
gram. 

If key fields have been packed, you can get a no record found 
condition because the signs are different. 

Chaining indicator is specified on chaining file only* 
When creating the index sequential file, be sure the key 
field is reproduced in the record, for all files, blocked, and un- 
blocked. 

If at all possible do not pack key fields, because there is 
no ability to chain from a card file if keys are packed. 
If no record is found HO is turned on. 
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VI. CHAINING (DIRECT ACCESS METHOD ) 

The Addrout option of the sort merge program can be used to 
produce a table of keys and associated track addresses. This 
table can be used to convert keys to a chaining address through 
a table LOKUP operation. 

This method will allow the user to add records with an R.P.G. 
program. By putting blank key fields in the original file, when 
a no record found occurs in the table LOKUP for a key then a 
LOKUP for a blank key will give a track address for new record, 
and setting of a resulting indicator will let the R.P.G. program 
know this is a new record. 
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VII. TABLES 

If a HI/EQUAL or LOW/EQUAL LOKUP is to be performed, the 
table must be specified as ascending on the file extension sheet 
or an invalid LOKUP will occur. Also the use of the resulting 
indicators is low gives next highest value, high gives lowest 
value . 
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VIII. ASSEMBLY LANGUAGE SUPPORT BY 
USE OF THE EXIT INSTRUCTION 



We have found that the .ability to interface R.P.G. and the 
assembler language through the RLABL, ULABL, and exit commands 
is very beneficial. The linkage is not complicated as the 
examples we have included will bear out. The routines can be 
in the relocatable library and will autolink. 

The first routine we found to be of help was the ability to 
block and unblock a segment of an input record by a displacement 
and length. The need for this arose when we wanted to loop on 
the calculation specifications and move across an input record 
picking up different fields and returning an updated value. (See 
Block and Unblock Routines) 

Another routine we have made extensive use of was a subroutine 
that allows the programmer to cause the program to loop between 
detail calculation and detail output until he resets it. This 
allows the formated output of tables at any time in the program. 
(See R.P.G. LOOP) 

A great aid in debugging is a routine that PDUMPS the status 
of all the resultings indicators and the label fields at any time 
specified. (See PDUMP) 

As mentioned before the HO indicator can be turned on for 12 
different reasons. Logically, all of these cannot occur in one 
program but several could at any one time, and no message is 
issued to distinguish one from another. Therefore we developed a 
routine to analyze the reason it is on and print it on the console. 
(See HALT) 



Also we found there was a need to give the operator some 
ability to align special forms prior to starting output. Since 
you cannot open or close an individual file in R.P.G. we devel- 
oped a routine to allow some alignment. (See AD JUS) 

Finally we did not like the idea of having to read one card 
to get the current date so we wrote a routine to get the date 
from the communication region. (See DATER) 



IX. IMPROVEMENTS WE WOULD LIKE TO SEE. 



1. Ability to create and add records to an index sequential file. 

2. Ability to control when chaining should or should not occur* 

3. Make the date from the communication regions available in 
the same manner as page number is . 

4. Allow the programmer to specify if a table should be filled 
by R.P.G. or just have space reserved and initialized. This 
could be done by leaving out the from file name on the exten- 
sion sheet. 

5. Allow a file to be closed and re-opened by the programmer. 

6. Don T t cancel a program because of a data exception either 
set field to blanks or zeros or give control to a special 
routine on calc specs for handling this. 

7. Allow program to have a separate block of coding that is 
executed on first page only. (Calculation and 0/P). 

8. Use a binary table LOKUP if an ascending or descending table 
is used. 



ATTACHMENT 2 
Using D.O.S. 360/30-40 R.P.G. 



( INITIALIZE^ 
V lst PAGE O/P / 




PERFORM 
TOTAL TIME 
CALCULATIONS 



I 



I 





PERFORM 
TOTAL TIME 
O/P 


LOAD LABEL 
FIELDS ON 
I/P SHEETS 
FROM I/O AREA 




4 





PERFORM DETAIL 
CALCULATIONS 



I 



PERFORM DETAIL 
O/P NOT COND. 
ON OV. 





V65 













<9aJ 


Yes 





PRINT O/P 
CONDITION 
ON OVERFLOW 



2*3 



SUBROUTINE NAME: BLK and UNBLK 



LANGUAGE : RPG (16 K.D.O.S.) 

PURPOSE : To allow the programmer to retrieve fields from an 

I/O area by changing a length and displacement value 
in the calculation coding. 

CALLING SEQUENCE: 



c 


EXIT 


BLK 


(TO STORE 


IN I/O AREA) 


6 


28 


33 






C 


EXIT 


UNBLK 


(TO RETRIEVE FROM I/O AREA) 


6 


28 


33 




(see Note 2) 


C 


RLABL 




IP BLK 


C 


RLABL 




PIECE 


(see Note 1) 


c 


RLABL 




LNGTH 


30 


c 


RLABL 




DISP 


30 


6 


-28 




43 


31 



NOTE 1: PIECE may be established as an Alpha or numeric field. If 
packed data is going to be retrieved PIECE must be numeric, 
otherwise RPG will pack the field again if it is moved 
from PIECE. 

NOTE 2: IP BLK must be an Alpha field and can have length established 
on I/P specs. 

OPERATION: 

BLK Takes DISP and adds it to address of IPBLK and moves from 

left to right out of PIECE the length of LNGTH into that 
address • 

UNBLK Works the same as BLK except the move is from IPBLK to 

PIECE. 
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* BLK 

* WRITTEN BY R, 

BLOK TITLE 
BLK START 
EXTRN 
USING 
STM 
LM 
ZAP 
CVB 
ZAP 
CVB 
AR 

BCTR 
EX 
LM 
BR 

SPACE 
MOVE MVC 
REGS DC 
SAVE DS 
DWRD DS 

END 

END OF DATA 



. C DICE JR. IBM DAYTON 

•*** GENERALIZED O/P BLOCKING ROUTINE ~ DOS RPG ***• 

IPBLK,DISPtPIECE t LNGTH 
BLK, 15 
2, 5, SAVE 
2, 5 , REGS 
DWRD,0(2,3) 
3 t DWRD 
OWR 0,0(2,5) 
5, DWRD 
2,3 
5,0 

5, MOVE 
2, 5, SAVE 
14 



GET 'DISP' (2 BYTES) 

GET • LNGTH * (2 BYTES) 

ADD 'DISP' TO 'IPBLK' 

SUBTRACT ONE FROM • LNGTH' FOR ' EX * 

MOVE 'PIECE' TO ' I PBLK ( DI SP+1 ) ' 



0(0, 2), 0(4) 

A ( IPBLK, DISP, PIECE, LNGTH) 

4F 

D 



'* UNBLK 
* WRITTEN 

* 

UNBK 
UNBLK 



MOVE 
REGS 
SAVE 
DWRO 

END OF 



BY R. C. DICE JR. IBM DAYTON 

i*** GENERALIZED I/P UNBLOCKING ROUTINE ~. DOS RPG ** 

CEtLf" 



TITLE 
START 
EXTRN 
USING 
STM 
LM 
ZAP 
CVB 
ZAP 
CVB 
AR 

BCTR 
EX 
LM 
BR 

SPACE 
MVC 
DC 
DS 
DS 
END 
DATA 



U' ^iKt .5 
S WE 



2,5 , KEGS 

DWR0,0(2,3) 

3,DWRD 

DWRD,0(2,5) 

5,DWRD 

2,3 

5,0 

b', MOVE 
2, 5, SAVE 
14 



GET «DISP« (2 BYTES) 

GET • LNGTH ' (2 BYTES J 

ADD 'DISP' TO ' I PBLK * 

SUBTRACT ONE FROM • LNGTH' FOR 'EX* 

MOVE •IPBLK(DISP+1)' TO 'PIECE' 



0(0,4) ,0(2) 

A(IPBLK,DISP,PIECE,LNGTH) 
4F 

D 



a 



nnS/360*R P n*CL 3000 10/04/67 PAGE 0001 

on 000 h 

F* TEST RPG LOOPING FEATURE 

F* 

001 FCAROS IPE F 80 80 READ01 SYSRDR 

002 FLTST V 120 120 OV LPR I NTFRSYS005 

F* 

003 L LIST 00^0106012 

I* 

00^ I CARDS A A 01 

005 I 1 80 AC A R D 

C* 

006 c 0IN02 Z-ADD5. LOOPCT 20 

007 C LOOPCT SUB 1, LOOPCT 02 
OOP C 02 $ ETON Ll 

009 c 02 GOTO LOOPST 

010 C SETOF LI 

011 CL1 LOOPST TAG 

0* 



012 


OLI ST 


D 


201 


OV 








013 





OR 




IP 








014 













10 


•LOOP TEST* 


015 





D 


1 


01 








016 













25 


'DETAIL 0/P CYCLE TAKEN • 


1 7 





T 


1 


Ll 02 








018 













27 


'LOOP CYCLE AT TOTAL TIME 


019 











ACARD 


120' 




020 





T 


1 


LIN© 2 








021 


o. 










21 


' REGULAR TOTAL TIME • 


(A/ 
















>0 




LOOP 


IS 




UJ/TH THC 



7>,o..$ Pel, /3 com pxLgje 



LOOP TEST 



LOOP CYCLE 


AT 


TOTAL 


TIME 


t Mni it 

I N P U 1 


r> r* c c\ n r\ 


1 


LOOP CYCLE 


AT 


TOTAL 


TIME 


I IS! PUT 


RFCORD 


1 


LOOP CYCLE 


AT 


TOTAL 


TIME 


INPUT 


RECORD 


1 


LOOP CYCLE 


AT 


TOTAL 


TIME 


INPUT 


RECORD 


1 


DETAIL O/P 


CYCLE TAKEN 








LOOP CYCLE 


AT 


TOTAL 


TIME 


INPUT 


RECORD 


2 


LOOP CYCLE 


AT 


TOTAL 


TIME 


INPUT 


RECORD 


2 


LOOP CYCLE 


AT 


TOTAL 


TIME 


INPUT 


RECORD 


2 


LOOP CYCLE 


AT 


TOTAL 


TIME 


INPUT 


RECORD 


2 


DETAIL O/P 


CYCLE TAKEN 








LOOP CYCl E 


AT 


TOTAL 


T I HE 


INPUT 


RECORD 


3 


LOOP CYCLE 


AT 


TOTAL 


TIME 


INPUT 


RECORD 


3 


LOOP CYCLE 


AT 


TOTAL 


TIME 


INPUT 


RECORD 


•*> 

3 


LOOP CYCLE 


AT 


TOTAL 


TIME 


T f. ; n 1 1 T 

I h PUT 


r» n r~ t~\ n p\ 

RECORD 


3 


DETAIL O/P 


CYCLE TAKEN 








LOOP CYCLE 


AT 


TOTAL 


TIME 


INPUT 


RECORD 


4 


LOOP CYCLE 


AT 


TOTAL 


TIME 


INPUT 


RECORD 


4 


LOOP CYCLE 


AT 


TOTAL 


TIME 


INPUT 


RECORD 


4 


I OOP CYCLE 


AT 


TOTAL 


TIME 


INPUT 


RECORD 


4 


DETAIL O/P 


CYCLE TAKEN 








REGULAR TOTAL 


TIME 











u/ 
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SUBROUTINE NAME; RPGLOOP 



LANGUAGE : RPG (16 K D.O.S.) 

PURPOSE; To obtain, multiple calculation, and 0/P cycle for a 
single I/P cycle • 

CALLING SEQUENCE: 

A* To start a loop 

C EXIT SETL 

6 28 33 

COMMENTS : If the loop is set at total time the program will 

immediately branch to the beginning of the calcula- 
tion specifications without any further total time 
calculations or output occurring. The loop will be 
between, detail calculation and detail output. 

If the loop is set at detail time the program will 
next execute the statement immediately following the 
exit* The loop will again, be between the detail cal- 
culation, and detail output* 

Bv To end a loop 

C EXIT RESETL 

6 28 33 

COMMENTS : If the loop was set at total time the program will 
immediately return to the total time statement 
following the exit to setl* 

NOTE: The exit to resetl must be at detail 
time regardless of where the set! 
occurred. 

If the loop was set at detail time the program will 
return to the statement following the exit to resetl, 

OVERFLOW 

Output will occur as it normally would. 
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* LOOP 

* WRITTEN BY 
* 



C. DICE IBM DAYTON 



LOOP 


TITLE 


DOS RPG LOOP COI 


RPGLOOP 


START 






ENTRY 


SETL 




ENTRY 


RESETL 




SPACE 






USING 


SETL, 15 




SPACE 




SETL 


CLI 


SWITCH, X«FF» 




BCR 


8,14 




MVI 


SWITCH,X'FF» 




STM 


13,14,SAVEREGS 




L 


14,X»E8» (3) 




LM 


13,14,X'F4« (14) 




STM 


13,14,SAVEAREA 




B 


MONITOR 




SPACE 






USING 


RESETL , 15 




SPACE 




RESETL 


CLI 


SWITCH , X ' 00 • 




BCR 


8,14 




MVI 


SWITCH, X'OO' 




L 


14,X«E8« (3) 




MVC 


X«F4' (8,14) , SAVEAREA 




LM 


13,14,SAVEREGS 




BR 


14 




SPACE 




SWITCH 


DS 


X 


SAVER EGS 


DS 


2F 


SAVE ARE A 


DS 


2F 




SPACE 





MONITOR L 
L 

BALR 

L 

L 

BALR 

TM 

BZ 

L 

L 

BALR 

SPACE 

BALR 

SH 

BR 

DC 

END 

END OF DATA 



7,X«F4' (3) 
15,X»B8« (3) 
14,15 

7,X»E4» (3) 
15,X'C0» (3) 
14,15 

X«i57» ( 13) ,'X»02' 

18(14) 



PERFORM 
DETAIL 

CALCULATIONS 
PERFORM 
DETAIL 

OUTPUT 
TEST FOR 

OVERFLOW 



7,X'E4« (3) 
15,X« 114' (3) 
14,15 

14,0 

14, 6( 14) 
14 

H'40« 



PERFORM 

OVERFLOW 



BRANCH BACK TO MONITOR 



SUBROUTINE NAME; PDUMP 



LANGUAGE: RPG (16 K D.O.S.) 

PURPOSE; To obtain, program status at selected, points during 
execution. 

CALLING SEQUENCE; 

C EXIT PDUMP 

6 28 33 

RETURN: The general registers and the entire indicator and 

symbol tables are dumped on the printer. Processing 
resumes at end of dump. 



* PDUMP INDICATORS AND LABELED FIELDS OF AN RPG PROGRAM 

* WRITTEN BY R. C. DICE JR. IBM DAYTON 



PDUMP 


START 






USING 


PDUMP, 15 




STM 


1, SAVE 




ST 


3 i START 




MVC 


FINISHt'-'X''94' (3) 




LA 


t START 




LA 


1 * ROUTINE 




SVC 


2 




LM 


0, 1, SAVE 




BR 


14 


SAVE 


DS 


2F 


ROUTINE 


DC 


C'$$BPDUMP' 


START 


DS 


F 


FINISH 


DS 


F 




END 




END OF 


DATA 





SUBROUTINE NAME: HALT 
LANGUAGE ; RPG (16 K D.O.S.) 

PURPOSE: To allow programmer to determine the reason HO has 
™" " been turned on. 

CALLING SEQUENCE: 



HO ON if cause is not known* 
HI ON if undefined record read. 
H2 ON if sequence error. 

H3 ON if no record found. (Index Seq. or Direct 

Access) 

H4 ON if wrong length record check. 



C 

6 



I I 
10 11 



EXIT HALT 
28 33 

II is any indicator (s) 



RETUEN: Typed Message of Cause of Error 




* HALT ANALYSIS PROGRAM 

* WRITTEN BY R. C. DICE IBM DAYTON 



HALT 


START 






USING 


*,15 




STM 


1,9, SAVE 




COMRG 






LA 


2,RESULT-1 




LM 


4, 8, REGS 




L 


9, ADDR 




MVC 


NAME » 24 ( 1 ) 




CLC 


288(3,3) , ZERO 




BC 


8, WRITE 2 




AR 


2,6 


LOOP1 


IC 


8, LENGTH (7) 


LOOP2 


CLC 


288(1, 3), 0(2) 




BC 


8,WRITE1 




AR 


2,6 




AR 


4,5 




BCT 


8,L00P2 




AR 


3,6 




BCT 


7,L00P1 


WR I TE 1 


AR 


4,9 




ST 


4, ADDR 


WRITE2 


EXCP 


CONSOL 




LA 


7,X'85' 




COMRG 






AH 


7,8(1) 




AH 


7,44( 1 ) 




IC 


8,13(0,2) 




AR 


8,7 




NI 


0(7) ,X'00« 




01 


0(8),X'F0« 




WAIT 


CONSOL 




ST 


9, ADDR 




LM 


1,9, SAVE 




BR 


14 


CON SDL 


CCB 


SYSLOG, CONSOLE 


CONSOLE 


CCW 


9,MSG,X'60' ,1 




CCW 


1,MESG,X«60« ,33 


ADDR 


CCW 


9, MESSAGE, X' 60' ,24 




CCW 


9, MSG, X' 00' ,1 


FIX 


DC 


A (MESSAGE) 


SAVE 


DS 


9F 


REGS 


DC 


4F'24,24,1,3' 


ZERO 


DC 


F«0' 


LENGTH 


DC 


X '00060304' 


RESULT 


DC 


X '02100408' 




DC 


X'804020' 




DC 


X'FF8040200410' 


HALTINDC 


DC 


X' 000 1000203000400000400000300' 


MFSG 


DC 


Q l >!' *\< ;J< 5[i l 


NAME 


DS 


CL8 


MSG 


DC 


C TERMINATED DUE TO ' 


MESSAGE 


DC 


C PROGRAMMER REDDEST • 




DC 


C INVALID CHAINING REQUEST ' 




DC 


C» UNDEFINED RECORD TYPE « 




DC 


C 1 SEQUENCE ERROR (MR) • 




DC 


C ' RECORD SEQUENCE ERROR ' 




DC 


C'DAM RECORD NOT FOUND ' 



DC 


C'DAM DATA CHECK 


DC 


C'DAM WRONG LENGTH RECORD 


DC 


C'ISAM INVALID KEY LENGTH 


DC 


C'ISAM DASD ERROR 


DC 


C'ISAM WRONG LENGTH RECORD 


DC 


C'ISAM -EOF- WITHIN LIMITS 


DC 


C'ISAM DUPLICATE RECORD 


DC 


C'ISAM NO RECORD FOUND 


DC 


C'NO APPARENT REASON 


END 





END OF DATA 
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SUBROUTINE NAME; DATER 
LANGUAGE : RPG (16 K D.O.S.) 

PURPOSE : To retrieve the date from the communications region. 

CALLING SEQUENCE t 

C ULABL DATE 8 

6 28 k3 51 

C EXIT DATER 

6 28 33 

RETURN ; Date as it appears in communication region (MM/DD/YY). 



SSL 



* PATFR 

* PICK MP DATE FROM COMRG FOR RPG 



PATF1 

HATER 



HDRG 
PATE 



START 

PALR 

USING 

STM 

CHMRG 

mvc 

LM 

PALR 

ENTRY 

OS 

DC 

END 



* , 1 * 

1. , 1 4 T HDRG 

DATE tO( 1 ) 
1 t 14, HDRG 
14,14 

DATE i DATER 
14F 

CL8« ' 

DATER 



END OF DATA 
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* ADJUS 

* WRITTEN BY R. C. DICE JR. IBM DAYTON 

ADJS TITLE *« 'ADJUST" SUBROUTINE TO ALIGN FORMS' 

ADJUST START 

USING ADJUST, 15 



LOOP 


LA 


1 , PRINT 


PRINT A LIME ON THE PRINTER 




EXCP 


( 1 ) 


AND SKIP TO CHANNEL 1 


ERR 


LA 


1, CONSOLE 


ASK OPERATOR IF RETRY DESIRED 




EXCP 


( 1 ) 


AND READ HIS REPLY MY' OR 




WAIT 


( 1 ) 


WAIT FOR REPLY 




01 


REPLY » X • 40 • 






CLI 


REPLY, C'Y« 






BE 


LOOP 


«Y' - GO PRINT ANOTHER LINE 




CLI 


REPLY, C'N* 






BNE 


ERR 


NOT 'N' - ASK AGAIN 




BR 


14 


• N • - ALL DONE 




SPACE 






PRINT 


CCB 


SYSLST,PR 




PR 


CCW 


X'89' ,LINE,X'00' 


, L ' L I NE PRINT, SKIP TO CH. 1 


LINE 


DC 


C 01 2345678 901 2 3456789* 




SPACE 






CONSOLE 


CCB 


SYSLOGtCON 




CON 


CCW 


X'Ol' ,MSG,X , 40» , 


L'MSG+l WRITE, NO AUTO-RETURN 




CCW 


X'OA' , REPLY, X'OO 


•,1 READ INQUIRY 


MSG 


DC 


C' PRINTER RETRY 


( i i Y " « » • M » • ) = « 




DC 


X' 16' 


BACKSPACE 


REPLY 


DS 
END 


C 




END OF 


DATA 
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MAINTENANCE OF AN INSTALLATION PROGRAM 
LIBRARY 
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Requirements for the Program Library 



Common Meeting September 6, 7, 8, 1967 

Arne Hoverstad 
John Johnson 
Dick Thomas 
Federal Reserve Bank of Minneapolis 

I would like to open my breif comments with two disclaimers* First, 
since I work for a Quasipublic institution, the FRB of Minneapolis, it is 
customary for me to point out that the views and beliefs here expressed are those 
of the author and not necessarily those of the FRB of Minneapolis. Second, in 
standing up and talking about the way that we handle our program library, we 
don f t mean to imply in any way that we have this particular problem completely 
under control. However, we do have some techniques that we use, some records 
that we keep and we find them helpful to us* 

We think of the program library as requiring two kinds of attention; 
planning and discipline. Under planning it is necessary or at least desirable 
to make some formal effort at describing the conditions, the environment, and 
the output that you want from your program library* It is certainly worthwhile 
to make an effort at writing down a formal objective, something more comprehensive 
than "we want a program library." This can be sort of a "chicken and egg procedure" 
with the other considerations that must go into the library. Let's list and 
comment briefly on each of those considerations* 

1* What are the contents of the library? 

The answer seems at first obvious* It is- a program library; 
therefore, it contains programs* However, there is more than one 
kind of program. For instance, our own library is divided into IBM 
programming systems, common programs, user-written programs, (that is 
our own programs to perform our own data processing work,) and our own 
subroutines that are common to several of our programs* In addition, 
we maintain in the program library a disk register; (a list of the 
usage of the 20 or so 1316 Disk Packs that we carry,) and a program 
name register; this last to avoid confusion between programs* The 
user might also consider filing data in a program library. We at the 
moment file our data separately* This is historical data, cost data, 
in our case economic research data. We will probably continue to file 
data under a specific and separate system although there will be some 
direct responsibility for the program librarian for this sort of thing* 

2. The second major consideration, it seems to us, is the system of 
filing that will be used* Should we generate some sort of classification 
numbering system similar to that used in the common library? Should, we 
file programs by name or title alone? Should perhaps programs be filed 
under a major classification of the disk pack on which or against which 
they are run? 

We file our program decks for the most part according to the disk 
pack, since we feel that the time that we are in a real hurry to get to 
a program or a set of programs is when we have just eobbered a disk pack 
and it must be completely reloaded* We do some cross-indexing by purpose 
in order to get at other "natural sets 11 of programs. ^/r> 
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3* Security is a problem to any installation* How much security does 
the installation require? We have two kinds of security problems at our 
installation. One kind we do not have is the question of proprietary 
programs, such as exists in some of the chemical or other processing 
industries. We do, however, have data that cannot be regarded as being 
in the public domain, that is individual transaction or balance data 
from commercial banks which they would be very unhappy if we published 
or allowed to be published, and of course we have the problem of 
providing security against loss of data or programs. We handle the 
first problem by purely informal methods* All people who work with 
or who have access to this data are made aware of the consequences and 
required security level of the numbers. The second problem we handle 
rather conventionally with back-up files. We have available to us a 
large and secure vault and maintain updated copies of programs and 
data within the vault. We update this backup copy at least onee a 
month, more often if we develop a large volume of changed programs 
or additional data. 

4* The fourth consideration and in many ways the most important is what 
should a program librarian be, and this we really don't have an answer 
for. We have tried using one of our more senior programmer analysts 
as a program librarian on a part-time basis* This has not worked very 
well* He has many other things to do and almost all of them are more 
interesting than working on and maintaining a program library* For 
the past year, we have had a non-programmer, non-data processer, 
non-analyst as a program librarian* He is an older man and has had a 
great deal of experience in the bank in senior .clerical and first-line 
supervision positions. Our experience has been good. A man of this 
kind can and will do the work, shows the responsibility that is 
required for work of this nature and we think that this may be the 
answer to the problem* He requires a great deal more guidance than 
a trained or experienced programmer analyst might* This guidance can 
sometimes get to be a bore but at least something is getting done* 

Planning a program library is quite easy, actually, anyone of us, I am 



sure, can sit down and draw up a list of specifications and filing procedures, 
and considerations and personnel qualifications for an ideal program library. The 
real secret we feel is discipline. If the staff and management of an installation 
is convinced that the program library that they have specified is an important and 
vital part of their work and are willing to devote time and attention in limited 
quantities to its successful maintenance and continuation, then there exists no 
problems. Unfortunately, the reverse seems to be true. Once a program is done, 
the problem is solved, the exciting part is over, it is difficult to maintain 
interest in seeing that the results are properly recorded and kept track of* 
Only if a data processing management keeps considerable pressure and maintains 
a continuing interest in the program library will any scheme or design no matter 
how beautiful be successful. This I think is our message. A program library 
is a necessary evil and unless you worry about it every day you are not going 
to have a workable one* 



Thank you very much. 
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Our intention in the presentation of this paper is 
to give a brief discussion of a COORDINATED STUDENT DATA 
SYSTEM FOR UHIVERSXTXBS . Our source of taatarial is the 
experience which was gained throughout the development 
of various University EDP systems. The major applications 
which contributed to this effort were tha Admission's 
System, the Registrar's System and the Alumni System 
Therefore, a discussion of these systems forms the nucleus 
of our presentation. Zt should be mentioned that this 
presents only initial thinking on a proposed CSDS. 
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STUDENT DATA 



Student data may be d.a fined as that personal , academic 
and financial information of each atudent which is vital 
to the daily operations of the various University depart- 
ments. 

It ia our purpose to discuss an approach to a unified 
coordinated system of centrally maintained student data. 
Our basic premise is that our currant EDP systaems of admission, 
registration and alumni represent a tangible parallel to 
the input, processing , and output of such an integrated 
system. 



The Coordinated Student Data System contains three 
data files* 

1* Admission Master File 

2. Student i>ata Pile 

3» Alumni Association File 

The system is based on the sequential flow of data 
through these files and the use of such data by the various 
University departments . 

I SEHTIFICATIOH 

The student records in each of the three alftove files 
will be identified by SSU. For those who do not have SSM , 
because they are wii^rs of a religious order or because 
they -are foreign exchange students* the Computing Cantor 
can generate a set of SBU that are invalid by the Social 
Security Administration standards, but are valid in the 
Coordinated Student Data System* This can be accomplished 
by generating a group of numbers and setting the first 
three digits to s*xo« JLists of available invalid SSH ara 
prepared by the Computing Center and sent to the Admission 
office* As a valid SSH becomes available to any of tha 
offices they can infora tha Computing Can tar of the ne*# 
SSM and tha change is mads , at tha saute tliae tha Comput- 
ing Can tar will prepare a printed sheet of the updated 
record and forward it to the originating office* 

SOOaCS DATA 

Tha original source of primary information to the 



FILES 




Student Data rile (SDF) la traced to tha sourca docuaanta 
which creat* the Office of Aflmissions Maatar File (AMF) 
of applicants* W*a documents which craata this fil* f their 
aourca, and the information which thay provide, ara aa 
follows i 

1. Application for Admission to the Onivaraity. 

A formal application la submitted to the Off lea of 
Adiaissiona by an applicant* This form should be designed 
to satisfy the need for a document of both detail and utility* 
It should provide for that detailed information which ia 
needed for admission dscieions and also facilitata tha 
key punching of basic information which la carriad in ftha 
AMP. Thia formal application is submitted to tha Off lea 
of Amissions by tha applicant* After conversion to machine 
sensible form* an additional record la generated in a sub- 
sequent update of tha AWP* Tha information extracted from 
tha amission application will comprise tha primary per- 
sonal and academic data of each racord on tha SDF* 

2* Sigh School Transcript. 

Froti this transcript, tha applicants high school 
academic history is entered In tha AMP and subsequently 
carriad to tha SOP* Tha transcript may foe available in 
punch card form from automated secondary school systems* 

3. CEE8 Scores* 

Tha applicants SAT and Achievement scores are entered 
in tha AMP directly from Educational testing Service (ET8) . 
These scores ara cur ran tly available in punch card form 
and tha Majority of these cards contain a social security 
number* Tor those cards which have a blank SSH field, 
a separata fila can ba created which is periodically matched, 
by name, again at tha AMP* 

4* Decision Card* 

Whan tha Of flea of Admissions arrives at a daclslon 
regarding an applicant, a Decision card is submitted for 
updating tha status of his racord on tha AMP* 

5* CSS Financial Haad Analysia* 



CSS Financial Uemi Analysis con * t , 

Initial information regarding a eanui£at**8 scholar* 

ship application is «tt&red in. the AS4P via a CSS card 
frw the Office of Pi Uncial Mcu The CSS (College Scholar- 
ship Service) card is. currently available f rem? £TS in punche 
card fom y ana usuajr&y contains a SSil, 

6. Pro- register*^ transaction* 

At the ra&sipt of an applicant s s deposit on tuition, 
t'te Uursar will pro via** a transaction card which will update 
the applicant's record status, thereby changing him to 
the category of "student* • This pre-ragi stared card may 
be pre-poncheo at "axscept* decision tlzm and enclosed irith 
the Lettfer of Acceptance forwarded to the student* 

7. Scholarship/Loan Transaction 

From tfta office of Finanttal Aid, a transaction card 
which provides the type ami ataount of aid which has been 
awarded to the candidate, is used to update hi® record 
on the AHF* This tr axis action card nay be a pre - punched 
mark-sense card which is prepared prior to cosmittee meet- 
ing * 

H* hist of State Appro w&d Loan** . 

From the individual states , a list of stuaaxvts and 
the amount of leans authorized, is provided to the Univer- 
sity • Ttm student record is updated with the currant amount 
and the emulative amount is subsequently brought forward 
to the BDF* This procedure rsay also be facilitated through 
the use of punch cards aada available by states * 

9* Transfer Status Transaction* 

In the case of transfer students \mo are accepted 
with advance standing, a Trans far Status Transaction is 
forth coming from the Office of Admissions after evaluation 
c>f credits to be transferred* This transaction may 'km 
in prepunched , mark~sense card fom, created during the 
update in which a transfer applicant is entered on the 
AHP. This information should be supplem^tad with the 
actual courses transferred whan transition is noa^e to the 
SDF, 
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TRANSFER OF DATA BETWEBH FILES 

At the end of the Admissions processing cycle f the 
Computing Center will update the SIMP with the pre~regis- 
tared student* fro© the AMF. This is the first of two 
file transition points in the system. In this case, p re- 
registered students on the AMF are physically added to 
the 8DF* The records of transfer students with advance 
stalling will be supplemented with those courses and grades 
which have been accepted for transfer* This transition 
takes place immediately prior to registration time* Those 
records which are not added to the SDF may be dumped to 
a card file for later use in statistical analysis . 

Registration affords the major input of primary source 
data to the SDF* In most cases, freshman registration 
will be the only time that new personal data is entered 
into the file* formally, only changes to personal data 
will occur at subsequent registration* Courses regis teeAd 
for, and class schedules, represent the input of primary 
academic data at registration* Whether registration requires 
physical attendance in all cases, or is accomplished through 
a pre-registration with a latter mail registration, a s*^fble 
well-designed form and class cards will facilitate updat- 
ing the SDF. 

Some o tiier primary sources of input to the SDF are 2 
1* The course grades which are provided on the class cards 

at semester end* 
2* Requests for financial aid, such as scholarships , loans 
and grants* In such cases additional financial infor- 
mation is entered into the SDF by cards , scholarship 
loan cards, state loan card®, etc* 
3. Participation in student activities, such as societies , 
sporfeports, clubs, etc** causes random updating of such ' 
information* 

The other transition point in this system occurs at 
the end of the registrar's processing cycle* The Comput- 
ing Center will process the SDF by updating class stand- 
ings for all students on file* At the same tima the Alumai 
File will be updated with graduating seniors from the SDF* 
Basic information such as ZD number* nmm and address , 
student 1 s school attended, year of graduation r degrees 
awarded extra curricula r activity and otner information 
will comprise the basic input to the Alumni File* Addi- 
tional information will be entered to the Alumni File by 
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the Placement Office and the Alumni Association. Through 
the use of specially designed forms the Placement Office 
will make available information on students dealing with 
that office, such as business address, industry classi- 
fication, job classification and level of position, The 
Alumni Association through the use of questionnaires will 
serve as another means of acquiring the updating business 
information of the Alumni. 

MAINTENANCE 

In each of the three files, responsibility for main- 
tenance falls on the corresponding Office of Primary Respon- 
sibility (OPR) ; that is, the Admissions Office is respon- 
sible for maintaining the Admissions file, the Registrar* s 
Office is responsible for maintaining the Student Data 
File* and the Alumni Office is responsible for the Alumni 
Association file. 

In order to facilitate the maintenance of the file, 
the Computing Center , in cooperation with each of the 
above mentioned offices, can develop a number of data 
forms. These should be designed to alter or add any or 
all information contained in the records. As changes 
or additions become necessary, the Office of Primary Respon- 
sibility fills out the proper forns and sends them to 
the Computing Center, where they will be key punched and 
processed against the proper file. While updating the 
files, updated records are printed and sent back to the 
originating department. These records are then added 
to master books that are periodically prepared by the 
Computing Center for each of the three offices. 

USES 

The uses of the Coordinated Student Data System are 
many. We will attempt to list the most important of these 
uses and briefly describe each application. 

A. Admissions. 

The following is a list of products and uses of the 
AMP by the Office of Admissions t 

1. Missing Information Lists, 

On a scheduled basis or as required, a listing can 
be produced which itemises any critical Information which 
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may be missing item m •pi»Xlc«nt'» raoord.j thl. list ean 

J^^fc ^stsw^^S* ^fcJstst ^EmJ^ ^s^b^ ^o^j^ jph^fepfcif.iiwp 1 JL^cMism ^sc^ ^(^Jt^jss' ^>i4s^ ^^csKKk^^flL^p^L^EMi^MV 
of the file and send out request for information ibitt anted. 
Work loan peaks resulting from rapid growth periods, asm 
bo alleviated by producing tut* reminders by computer and 

A further mm of missing information lists is found 
in the processing of special applicants, Xn the case of 
foreign students, religious, veterans and other, a deci- 
sion &ay be reached promptly when the presence of ail criti- 
cal information is deemed impossible, 

2. Summary Information labels* 

A summary of information on each applicant can be 
produced as his record becomes complete. This data can 
be printed on labels, index cards, lists, etc., and for- 
warded to the Office of Admissions to be entered on the 
applicant's folder # The type of information contained 
on a label may be Heme, date, address, high school, SAT 
and Achievement scores. High School average, program applied 
for, predicted QPX and other significant data* Subsequent 
labels may be produced by a change in any information h 
shown* 

Oocassionally , these labels may be used by other depart** 
ments, such as the Deans of the various schools. For exam- 
ple, the class sectioning of entering freshmen Biology 
majors can be facilitated with such handy information. 

3. Decision Cards. 

Concurrently with producing the first summary label, 
a decision card can be prepunched with ID information. 
This card is then filed into the applicant's folder to 
be later mark~sensed with the Committee on Admissions 
decision. The Decision card will then be used to update 
the applicant's record on the AMF. 

4. Pre-Regi* tared Transaction Cards. 

A pre-registered card may be mailed to each applicant 
with the Letter of Acceptance* This prepunched card may 
be produced simultaneously with the decision card or it 
may be punched only after an * accept" decision has been 
made. The card will then accompany the student 9 s deposit 
to the Bursar and, thereafter , be used to update the AMP. 
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5« Advance Standing Card* 

h prepunched mark-sensed card can bm product and 
forwarded to the Office of Adiaissions at the time a trans- 
fer student is accepted* After evaluating the credits 
of fared for transfer* the advance standing card can he 
marked with thoea courses accepted for transfer and used 
to update the SDF after the JUKF transition. 

£, JLetters of Acceptance/Re jection • 

During the AMF update at which a decision card is 
entered, a letter of decision may be generated to be mailed 
directly to the applicant* 

7* Admissions Master Flla Analysis. 

On a scheduled basis, such as weekly or semi-monthly, 
a YTD comparative report may be produced as a by-product 
of the file update* Sued) a report can be a clncisa ana** 
lysis of the fila. Totals and other ratios of current 
year to prior year can be presented for all combinations 
of programs and for each category of record status. This 

C report provides a most effective decision-making tool which 
may foe utilised in maintaining control of class sixes, 
preparing progress reports, and determining teacher schedul- 
ing and resource planning. 

S» Mailing Labels and Addressed Envelopes . 

A significant advantage of a computerised admission 
system is the efficient production of bulk mailings, ailing 
labels or addressed envelopes, or cards, mayba generated 
for any of all portions of the file* 

9. High School Applicants* Lists* 

For each High School , a list of graduates who have 
applied to the Uni versity can be prepared. Such a list 
wmy giv*& the applicant f s nai&e, the action .taken, and whether 
a scholarship was given* Aside from answering inquiries 
from the High Schools, the list can prove helpful during 
recruiting tii&e* 

10* Has tar Book* 

An edited listing of the entire file may prove helpful 
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in answering random inquiries* It nay also saffice as 
a record of changes made, if noim ia otnerwiatt prepared. 

ii. Statistical Reports* 

A wicks variety of statistical reports can be generated 
as a by- product of maintaining da tailed records on all 
applicants* The following in an example of a few such 
statistics . 

a) Frequency distributions massed on Verbal and Math 
SAT scores 9 and rank in class can be generated for each 
proqrais? of each school by appoied , accepted and pre- r**gi stored 
applicants . 

d) Geographic and demographic analysis of quantity 
and quality are often helpful* 

c) Correlations of actual versus predicted QPI for 
tiie various schools, programs, etc. giv« an indication 
of the validity of sucn a factor* 

h * H0gis_trar 

Tha u&es that the Registrar Office can make of the 
SDF are many* Borne of tne rsajor uses are as follows; 

I. Class Lists* 

These lists are prepared at the beginning of each 
semester; they nay contain the following informations 
course nam*, title ana credits < instructor's name, time* 
ana place of meeting , ana an alphabetical list of each 
student taking the course . These lists can toa us<&cl by 
the instructor to record the student progress during the 
terrcu 

2*. Class Cards* 

Class cards ara produced in course order at the begin- 
ning of each semester* For each course* a card for every 
student taking that course is produced* The cards may 
contain the student's name and number* and the course received 
by students on the SDF* 

3* Student Schedules* 

Student schedules may contain the following informa- 
tions student name and Id number, student address , and 
a list of courses with time and place of meeting* These 
schedulers are mailed to the students and another set Is 
retained by the Registrar for their records* 
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4. Grade Reports* 

ht semester's end, grade reports are produced. Each 
grade report may contain the foliating information: stu~ 
aent name and ID number, student address , and a list of 
courses with the corresponding grade, number of credits, 
YTO f and cumulative credits, quality points and indices. 
One copy of tliese grade reports is mailed to the student, 
and the other is retained by the Registrar for their records. 

5. Transcripts. 

Transcripts reflecting a student's achievements dur- 
ing his scholastic career are produced periodically. These 
transcripts may contain the following Informations stu~ 
dent name and ID number, student address, and a list of 
courses with their corresponding description and the grades 
received for these courses , any hfcnors awarded, etc. 

6. Ranking Lists. 

Lists in YTD and emulative index order are produced , 
showing rank in class for savery student on the SDF. 

C . Deans ^ and ^p^r tme n t l Chai rmen . 

1. Grade Analysis. 

Thm grade analysis report is produced at the end of 
€*ach semester in order to aid the Deans in evaluating indi- 
vidual teacher performances. For each course , the grade 
analysis report contains the following information: course 
name, instructor's name, number of credits, the number 
of students taking the course and a distribution of grades 
awarded by the teacher i that is, the number of **h*m m given, 
the number of ft B+*s f * given, the number of *8 f s* f etc. 

2. Instructor's Schedule. 

Instructor's schedules may contain the following informa- 
tion! instructor's name and a list of courses the instructor 
is responsible for teaching* Each course will contain 
the time and place that It meets. These schedules may 
be used in locating individual Instructors « 




3. Honor Lists 



Honor lists can km prepared shoving the nmmm of stu~ 
dents eligible for awards* 

4 # Problem Students. 

bists of students whose index is below a certain lewl 
can foe produced periodically and forwarded to the ae&n f s 
Office, where individual attention may be given these stu- 
dents * 

5. Graduating Seniors * 

Complete reoorde on graduating senior can be produced 
to determine if any deficiencies exist in their programs* 

S* Test Soaring* 

Pre-*punched test scoring cards may be produced for 
any course by request of the instructor* These cards amy 
contain the IB number* student name, and course number* 
They will be used as input to a teat scoring progress* • 

B* Li|>rar^; 

1 # Student Master File* 

A Student master file can be made available to the 
library* This master file may show the student f s ID number* 

address.* etc* It may h% used to verify student status • 

2* Reminders* 

Reminders on loaned books and overdue notices may 
ba produced for the library* This should greatly facili- 
tate collection of loaned books* 

B. Physical ^ Plan t * 

1* Room Schedules* 

loom schedules reflecting its use can be made avail** 
able to physical plant in order to facilitate service 



schedules and allocation of rooms on special requests . 

P. Central Mailing 

Central mailing may use the CSDS to produce mailing 
labels for all general and selective mailings* 

G. Alumni Association . 

A major report which may be produced from the Alumni 
file is missing information lists. Periodically missing 
information lists, designed to facilitate the collection 
of data to the Alumni file, can be produced. A typical 
missing information list might be one containing all Alumni 
who do not have a telephone number on file. 

1. Directories. 

Alumni directories can be alphabetical, geographic, 
or class and school produced from the Alumni file. 

2. Fund Raising 

Of all the areas in which the Alumni file is used 
by the Alumni Association, fund raising is undoubtedly 
the most important. For this reason, a more detailed account 
of this application will be given. 

a) Worker Assignment Lists. 

Lists of all Alumni with a better than average giv- 
ing history can be produced. These lists may be used 
to aid in recruiting workers that will participate in 
the annual fund raising campaign. 

b) Phonothon Pledge Cards. 

The phonothon pledge cards may consist of two parts. 
One part may contain personal information, giving the 
history of the alusnni; and the other may contain his 
name, address, and a place to write a pledge. These 
cards are used by the workers to contact the alumnus 
by telephone and try to solicit a pledge. 

One part of the pledge card is mailed to the Alumnus 
reflecting his amount pledged; the other part is used 
to enter the result of the telephone conversation in 
the Alumni File. 
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c J IRwwn t nds rs * 

Darin? the campaign, Monthly reminders can be pro- 
duced from th« Altnsii file, these reminders are pro-* 
duced for all alumni who have not fulfilled their pledge, 
they show the «K»mt pledged, the anount given to date 
(If any) , end a balance due. Reminders are then mailed 
to the Aluanufl in the hope that a payment for the amount 
pledged will be sent. 

d) Receipts, 

Daily receipts of payments can be produced and mailed 
to the donors at the sane tine that the file is updated* 

e) Block Sheets, 

Block sheets stay be listings showing a detailed 
list of donors and amount given by each donor* They 
also show the total dally intake. 

f) worker Reports. 

Worker reports can be produced periodically to report 
te the individual workers the progress of their group* 
These reports may contain the worker's name, followed 
fcy a list of prospects, the amount pledged * and the 
«mount given by each prospect* 

g) Progress Reports. 

Reports can Iw produced to reflect the amount of 
progress to the campaign director. They may contain 
the nasties of all alumni mho hmvm pledged and the amount 
given by the alumni, if any* Totals such as total pledge* 
total five*!* total number of pledges and total number 
of donors oat* also be produced to reflect the overall 
progress. 

h) Year-end Analysis * 

h detailed year end analysis reflecting the fund 
raising campaign can be produced* this analysts may 
range frost a general university-wide performance ana- 
lysis to a selective geographic and school^elass ana- 
lysis* 
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H * Bursar 

The office of the Sursar can extract information 
from both the Admission Master File and the Student Data 
File* 

Totals and exception lists may comprise the major 
use of the Admissions Master Pile by the Bursar. Receipts 
of tuition payment raay be produced by computer for the 
Bursar, but often, the students cancel lad check in regarde 
as sufficient receipt • A list of all pre- rog i & tared Fresh 
mail* including amount of tuition prepaid , may ba produced 
prior to registration • 

The following are two usee of the SDF by the Bursars 

1* Tuition and Feas Pay&ent Transaction. 

Prior to registration, a set of prepunched payment 
cards niay be produced which contain tne type and amount 
of any financial aid authorised* These cards may then 
ho used to record any payment made on tuition 'and fees* 
and later used to update the SDF* 

2. Post-registration Totals* 

After registration, a sumary of totals can be pro~ 
vided for the Bursar* Totals $ such as amount of tuition 
and foes paid and balances due, can be helpful in verifi~ 
cation of account balances? as well m enhancement of 
the internal control. 

X. Financi al Aid 

The Office of Financial Aid may utilise both the 
AMF and the SDF # The following may hm output from the 
AMF regarding incoming Prosh&an. 

1. Summary Information Labels ♦ 

A label of sugary information can fee provided for 
all applicants who have been accepted for admission * 
This information can be used for cross reference on all 
who apply for financial aid* 

2. Financial Aid Applicants 1 List* 

Prior to the Financial Aide Award ComdttMt fseeting, 




a list can be produced of thosa applicants for which a 
CSS card lias been received. This list may toe ordered 
by predicted QPX, adjusted need, or sane other criteria . 
It should contain the p@rtir.ent personal, academic, and 
financial information which im needed to make award deci- 
sions, 

3. Financial Aid Authorisation Transaction. 

& set of isarlcsen&e cards may be punched coacurr@nt.ly 
with the financial aid applicants list for use by the 
awards cowaittee. M awards are made, the amount and 
type laay be marked on the card for later us® in updating 
the AHF, 

4. Financial Md 3mae& Letters. 

As the &MF is updated with the marksense authorisa- 
tion cards, a letter of award can he prepared for mail- 
ing to the student, 

5. Financial Aid Candidate List. 

After the pre-regiatration deadline, a list of those 
students who have accepted the awards can be produced 
as a follow-up procedure. This listing may be used as 
a final office copy for report preparations and inquiries. 

6. Swaraary totals. 

Xn conjunction with producing the candidate list* 
a complete register of somaxy totals can be periodically 
printed. Such item and amount accumulation* will be very 
useful in maintaining control of funds as well as prepara- 
tion of required Federal and state reports. 

The SDF is used for processing undergraduates by 
the Office of the Financial Aid in essentially sane man- 
ner as the fiMF is used for proeessisig incoming freshman. 
The significant difference is the use of University academic 
data in lieu of high school data and board scores. 

J. Clubs, Societies, Asportations, Etc* 

The SST may be used by the various University clubs, 
societies, and other organisations whose end nay be academic, 
athletic, social, etc. h variety of information Is avail* 
able for soliciting potential members, or contacting pre- 
sent members. The eajor use then is special sailing labels 
or pre-addreesed envelopes* 
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Km Pragjj^ggtt^s Of f log 

The office of the President, or the Board of Trustees , 
require the additional advantage of an information sys- 
tem over a record keeping system* That advantage is the 
developement of informative statistics from which deci- 
sions on policy and future planning can be Bade, Prior 
year to current year comparison totals and ratios , wikftt 
the isyriaci of variables, could render the recordkeeping 
a small portion of the system* For example , to know khe 
relative quantity of applicants requesting dormitory resi- 
dence over vom&uters could facilitate the decision to 
build a new dormitory* 
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CONCLUSION 



A Coordinate Student Data System must encompass 
ail offices of the University that hmm a need for stu- 
dent data* Such an allHtocluslva system ttiXl enjoy the 
following advantages » tion-*dupii cation of effort is avoided 
through singular introduction of source data* trough 
th» estal^lisln^nt of Offices of Primary Responsibility 
(OPR) , eas# of file maintenance is attmtvmd. Economic 
availability of data, for all University departments is 
gained through centrally maintained student data* Con- 
sistency of information is assured through the inherent 
compatibility of ocwraa source data* Last, but not least, 
the University will realise an abundance of 'research data 
to be used in the analysis of diversity pmrformmm* 

with the addition of the necessary terminal equips 
nent; the CSDS is potantially a real-time system* thus 
providing the special advantages of such a system. 
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STUDENT DATA FILE 
Sattple Information 



DATA 



wpb primary source worn 



office or 

PRIMARY 



1* Social Security number C 



2. Name C 



3. Bom* Address C 



4* Local Address C 



5* Residence Code C 



6» Phone Number C 



?« Sex C 



8. Casapu* Residence C 
Mall Box dumber 

9. Date of Birth C 



10. Marital Status C 



11. Veteran Status C 



12. Cltisen C 



13. Birth Place C 



1 4 * Parent/Guardian C 
Nam 

15. Parent/Guardian C 
Address 

16 » Father/Mother C 
Alumnus 



Admissions 
Application 

Admission 
Application 

Admission 
Application 

Registration 

Pons 

Registration 
Form 

Registration 

FOJPSk 

Admission 
Application 

Registration 
Pons 

Admission 
Application 

Admission 
Application 

Admission 
Application 

Admission 
Application 

Admission 
Application 

Registration 
Form 

Registration 
Forsi 

Admission 
Application 



KP 
KP 
KP 

KP 

KP 

KP 

KP 

KP 

KP 

KP 

KP 

KP 

KP 

KP 

KP 

KP 



ftagietrar 
Registrar 
Registrar 
Registrar 
Registrar 
Registrar 
Registrar 
Registrar 
Registrar 
Registrar 
Registrar 
Registrar 
Registrar 
Registrar 
Registrar 
Registrar 



(2) 



DATA 



vrm pmwim source 



vow ovnm of 

PftXHAMr RES PON, 



17* Spouse* f s £3ame 



18. Religion 



19* Student Hospital 
Insurance 

20* Student Activities 



21, High School Hmm 



22. High School Address 



23. High School GEEB 



24* Type of High School 



25. Year of Graduation 

(High School) 

26 + High School Average 



27. High School Bank 



28* SAT Scores 



29. Achievement Scores 



30* Transfer Status 



31* Tsar of Graduation 

Present Program 

32* School enrolled 



C Registration 
Potts 

C Registration 
For© 

C Registration 
Form 

C Student Affairs 

Form 

A Admission 

Application 

a Admission 

Application 

A Admission 

Application 

A Admission 

Application 

A Admission 

Application 

A High School 

Transcript 

A High School 

Transcript 

A ET8 

CEE& Card 

A ETS 

emm Card 

A Amission 

Application 

A Admission 

Application 

A Admission 

Application 



KP Registrar 



KP Registrar 



KP Kegistrar 



tip Registrar 



KP Admissions 



KP Admissions 



KP Admissions 



KP Amissions 



EP Admissions 



KP/PC Admissions 



KP/PC Admissions 



PC Admissions 



PC Admissions 



KP Admissions 



KP Admissions 



KP Registrar 
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DATA 



TTPfi PRIMARY SOOftCE FORM OFFICE OF 

PRIMARY RE8F0H. 



33* Prograa Enrol lad 



34* Teacher Certification 



3S» Matriculated 



34. Ooureee Currently 
ftefletered for 

37* Class Schedule 
of above 



3t* 

3i* Loana Authorised 

40* Scholarships 

41* Mark areata 

42* Oranta in Aid 



43* Fsatlly Financial 
Stetue 



A 
A 
A 



Adalselon 
Application 

Admission 
Application 

Registration 



Registration 
Fbm 

Grade Deport 



Orada Aaport 

Financial Aid 
Flam 

Financial Aid 
For» 

Financial Aid 
Form 

Financial Aid 



KF Registrar 



XF Registrar 



KF Begletrar 



KF 
KF 



Reglatrar 
tegletrar 



VS8 

CSS Card 



KF ftsgletrar 

H/8 Financial Aid 

S/S Financial Aid 

M/S Financial Aid 

H/8 Financial Aid 

FC Financial Aid 
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LABORATORY AUTOMATION BASED SYSTEMS (LABS) 



Definition 

LAB Systems are defined as the application of largely sensor based 
1800s and 1130s in the laboratory to perform functions such as: 

A. Data Acquisition Recording of data at a rate dictated 

by characteristics of the instrument 
and the experiment. 

Data Handling - Data Massaging 
prior to analysis. 

Filtering 

Averaging 

Scaling 

Validity Checking 

B. Data Analysis Selection of appropriate analysis 

routine based on: 

Accuracy Requirements 
Speed of Response 

Analysis for purposes of interpretation 
of instrument output. 

C. Data Management Identification- Comparison of interpreted 

data to known standards. 

Display of experimental data. 
Cataloguing of experimental data. 

D. Experimental Management Reset of experimental facility to 

next condition 

Real time interaction between the scientist 
and his experiment 
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A laboratory is also defined as a facility in which various levels of 
instrument (sensors) usage can take place. In addition, at least 
80% of the instruments found in a laboratory fall into the spectrometer 
category; i.e. , they produce a graphic output as shown below which 
is characteristic of a material/compound being analyzed. 



Concentration 

Energy 

Etc. 




Wave length, mass #, energy distribution, etc. 



Common Instruments 

These instruments in a research laboratory can be involved in 
activities such as: 

Pilot Plant Studies 

Quality or Production Control 

Testing (Components or Systems) 

Materials Analysis (Analytical Chemistry) 

Basic Research 

It is therefore possible to find anywhere from one or multiples of one 
to twelve different types of instruments in any given laboratory. For 
instance, a petrochemical laboratory may house multiples of a dozen 
of the following types of instruments. The mix is dependent upon their 
concentration on a particular classification of chemistry. 
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Types of Instruments 



Analytical 



c 



Amino Acid Analyzers 
Mass Spectrometer 

Nuclear Magnetic Resonance Spectrometer 
Emission Spectrometer 
X-Ray Diffractometer 
Multichannel Analyzer 

Infrared/Ultraviolet/Visable Micronove Spectrometers 

Electron Spin Resonance Spectrometer 

Spectro Photometer 

Ph Analyzer 

CHN Analyzer 

O2 Analyzer 

Gas Chromatograph 



Medical/Clinical 

Electrocardiograph 
Electroencephlograph 
Electromyograph 
Electrophoresismeter 
Auto Analyzers 
Coulter Cell Counters 
Cell Scanner 

Nuclear 

Pulse Height Analyzers 
Spark Chambers 
Film Digitizers 

Neutron Time of Flight Analyzers 

X-Ray Flourescense 

Electron Spectrometer 

Beta, Gamma, Alpha Counting Systems 



Mechanical 



Tensile Strength Analyzer 
Dynamometer 

Film Thickness & Hardness 
Vibration Table 



c 



Other 



Viscosimeters 

Refractometers 

Hardness 

Flame Photometers 
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Incentives 

The incentives to automate the laboratory are both tangible and 
intangible • . .both benefits are clear advantages over any alternate 
automation approach. 

General 

a. All the simple and obvious research has been completed. 
Today scientists require elaborate experimental facilities 
which may take years to plan and/or build. The ideas 
behind the use of these new experimental devices must be 
tested within a one or two year period after completion of 
the facility. The experimentalist feels compelled to publish 
his findings within that period or he may be pre-empted by 
someone else taking a possibly more advanced approach. 

b. Because of the precise timing requirements of the experiments 
conduct/control or the quantity of data generated, the computer 
approach is the only reasonable way the experiment can be 
accomplished. . .some experiments generate thousands of events 
which have to be individually analyzed to substantiate statistically 
the existence of a new material. 

c. The computer can tell the experimentalist when things may be 
going wrong. . .is the experiment data valid? Also, the cost of 
running experimental equipment may be significant. . .an on-line 
computer may prevent malfunctions in its operation, thus 
increasing its safety level as well as availability to the researcher . 
In addition, the speed of the computer will allow optimum usage 

of the experimental subject. . .as in the case of a fast changing 
radioactive isotope which is decaying into other materials. 

d. The digital computer's availability and versatility now allows it to 
simulate experiments common to the physical sciences. Such work 
often uses higher order languages which are written in terms under- 
stood by analog computer users or people used to solving complex 
mathematical problems. 

e. The computer system allows the experimentalist to obtain improved 
accuracy either directly by means of the A/D converter and the 
"absolute" nature of the digital computers problem solving capabilities 
or indirectly through the statistical treatment of meager or vast 
amounts of experimental data to obtain correlations. It has been 
stated that instruments have had their accuracies improved by one 

to two decades through the use of the digital computer. 
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Assurance of greater precision for data acquisition, data 
analysis and experiment control. 

Data handled by a LAB System in digital 
form (assuming a properly designed front 
end) will provide significantly greater 
accuracy than in conventional techniques . 

Conventional Techniques 

Method of Recording Instrument Error Readability 

Strip Chart (inked) 1/4% 1 part in 150 

Oscillograph (heat sensitive) 2% 1 part in 50 

AM Magnetic Tape 3-5% 

FM Magnetic Tape 1. 75-3% 

PDM/PLM 1-2% 

Note: When the total data acquisition routines associated 
with conventional techniques are considered, the 
accumulative errors have been as high as 14%. 
Significant additional errors are usually introduced 
in the system through manual analysis of the data 
and control of the experiment. 

LAB Systems Techniques (with a suitably designed front end) 
operate with an instrument error in the order of .01— 1% and 
has a readability of 1 part in 16,000, 



Consistent (24 hr./day) experimental observation and control. 
The sampling of sensor based data can take place under 
programmed computer control, on an interrupt basis at 
varying time intervals: 1 sec. , . 1 sec. , .01 sec. , . 001 sec. , 
etc. , or on a demand response basis. The important point 
is that the computer can faithfully take data on a fixed or 
variable basis presented by the experimental conditions during 
the life of the experiment. 
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c. Decreased incidence of lost or worthless data due to instrumentation 
or system malfunction. 

A typical input from an instrument may contain valueless 
data. In fact, a very large fraction of the data generally 
falls outside of the areas of interest to the experimentalist. 

The comparator circuits or editing routines of a LAB System 
can insure that only data within limits is digitized and stored. 
In comparison when blind recording techniques (FM or analog 
magnetic tape) are utilized, it is common to witness periods of 
lost data in large blocks. Digital systems can be programmed 
to self- checking. 

d. Release of scientists from routine tasks such as data taking, 
scaling, calculating, experiment control. 

A typical single crystal analysis may require 2,000 different 
adjustments to the goniometer /scintillation counter head; in 
addition in excess of 100, 000 pieces or data must be extracted 
from an analog record on a strip chart recorder. The 
magnitude of this problem is obvious, considering that the 
maximum manual digitizing rate is 8 points/minute excluding 
the goniometer control problem. A LAB System can do 
these tasks automatically. 

e. Increased control in the conduct of the experiment. 

Research at times operates on the fringes of known operating 
limits. It must push the state of the art. . .enter the unknown. 
For examples, there are today complex analytical instruments 
associated with small reaction chambers that operate at high 
termperatures and pressures. The computer monitoring of 
strain gauge placed on the exterior of the chamber will allow 
the experiment to proceed under control at the computed 
limits of the rated design. 

f. Conservation of expensive materials such as reactants, isotopes, etc. 

Often times experiments require exact amounts of reactants 
or isotopes which may be decaying into other isotopes at a 
rate fast enough to produce erroneous results. Such experi- 
ments are enhanced through the use of an on-line computer 
which can insert or inject samples on a closed loop basis in 
reproductably exact quantities. In addition, if a known or 
changeable amount of material must be introduced which 
involves time dependency, the on-line computer can conduct 
the experiment "flawlessly" within the given time frame and 
thereby limit the effect of an isotope's degradation upon the 
experimental results. An ancillary benefit in such environ- 
ments is that the computer can maintain an inventory of 
isotopic materials under use and at hand. This is required 
by AEC regulations. ^ Q 



The fringe benefit of obtaining a greater understanding of the 

complex research devices /instruments. 

Instruments such as a mass spectrometer contain power 
supplies, ionization gauges, sweep voltage controls, etc. 
The monitoring of the critical points in a mass spectrometer's 
components will allow the researcher to quickly determine if 
the equipment is "in phase", i.e. , for a given situation (setting) 
are all other subsystem outputs realistic. The data correlation 
power of the computer will allow quicker debug time of the 
instrument. In addition, a history of machine operation/malfunction 
can be retained in disk memory to pinpoint wear in the components 
of the instrument. 



All experimental data is in a retrievable form. 

Data in a digital form, on any recording medium (except printed 
on paper), i.e., magnetic tape, disk files, data cells, can be 
quickly retrieved for analysis purposes at a later date. Also, 
the data can be added to during the experiment. Such capabilities 
are required to identify materials from a large data base such as 
ASTM tables. These tables are used today in an off line manner 
to identify compounds. 

A "Quick Look" at experimental results: 

The results of an experiment's progress may apparent from 
raw data. The on-line computer will allow the research to 
analyze an envelope of data (a sampling of data over a given 
time frame) and print such data on a typewriter or display it 
on a CRT. This ability proves invaluable especially in complex 
experiments where computed theoretical results can be compared 
with the analyzed "quick look" results. Such information may 
cause a complete redirection or reappraisal of the experiment. 

"Self- Checking" Capabilities 

The on-line digital computer is a self-checking device. . .the 
only absolute device in the experimental system. It has the 
capability, if properly programmed, to impose dummy voltages, 
bit patterns, etc. , in control circuits, and by putting the normal 
control element in a hold or bypassed condition, check the correct 
functioning of all components. The same program can even "exercise" 
the control elements during an experiment Similar capabilities 
allow the on-line system to standardize instruments automatically 
on a timed or as required basis to eliminate base line drift problems. 

Operator Training 

Routines can be written which will allow the new analyzer 
operator to simulate the conduct of an experiment. As systems 
become more complex, such capabilities will prove more useful. 
Training can utilize the computer's spare time. 

311 
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L Exact Time Correlation 

The correlation of time with experimental procedures is an 
often overlooked problem. When recognized it becomes an 
expensive problem to solve. Even if strip chart recorders 
have time printed on them it is impossible to accurately relate 
it to manual experimental procedures. On the other hand, the 
digital clock in the on-line computer can allow all phases of 
experimental conduct to be time correlated to the microsecond 
level if necessary. Time can be in relative or absolute units. 

m. Batch and Time Shared Usage of the Central Processing Unit 

The normal laboratory use of a computer today is in a batch 
mode, i.e. , the experimentalist takes his deck of cards to the 
computer center for solution. Nov/ programming systems exist 
which allow a single computer to provide batch capability while 
at the same time conducting on-line tasks such as data acquisition 
and closed loop control of experiments. 



n. Efficient Facility Usage 

The- ability of the on-line computer to compute results of an 
experiment within minutes after its completion can greatly increase 
the utilization of complex analytical equipment, 

o. New and Timely Experimentation 

This incentive cannot be overlooked. The technical world 
changes very rapidly and what is research today will be routine 
in the future. Instrument design and data rates are changing. 
Experimental procedures are being enhanced by graphics, in- 
formation retrieval and on-line interaction of the researcher with 
his experiment. Only the computer can provide this flexibility 
on a controlled and timely basis. 
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Systems Approaches 

The laboratories which are automating today are taking four systems 
approaches . 

1. 1 (one) instrument - very small CPU - 1 (one) researcher 



o 



1 instrument 




4K-8K 
CPU 



J Paper Tape 
I/O 



( Largely in basic 
research environment) 



Typewriter 



Considerations 



Low initial investment 
Dedicated system 



Programming in machine language 

No growth system 

Unsupported 



2. Multiple instruments of same type - small CPU - 1 supervisor 



Instruments 


Analog 
MPX 


| 















*(1130 or 1800) 




Considerations 



! m T typewriters 



(Largely in QC 
lab environment) 



Easily customized front end 
fixed programs, low demand 

on CPU 
easily justified 
easy to support under a TSX 



low CPU usage factor 

difficult to add different instrument 

fixed time slices in data acquisition mode 
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3. Multiple instruments of different types - small CPU - many different 

users 



Instruments 


Analog 
MPX 













Instruments 




*(1130 or 1800) 



Configuration for multi-purpose 
laboratory facility 



Considerations 

Capable of satisfying many 
different users on a demand 
response basis 

Possible to dynamically 
adapt to experiments 

Remote link to 360 

Capable of more than 
data acquisition tasks 



High initial cost 

More sophisticated programming 
required 
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4. Total integrated laboratory information system 



Insts 



Digital MPX 




Time 
Sharing 
Terminals 



Insts. 






Small 
Scale 
CPU* 


$ 


ADC 











slow speed exp. 
up to 50K accrued 
data rates 




*(1800 
1130) 



S/360 - 50 - 75 




(S/360-44) 



(High speed experiments 
up to 500K words, accured 
data rates) 



For large laboratory/ 
corporate complex 



CONSIDERATIONS 



Total approach 



Programming requirements are complex 



Capable of widest 

range of laboratory applications 



Price is high unless remote S/360 is 
time shared 



Fast turn around time 



Offers large CPU for total 
problem solution 
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Modes of System Operation 

Each different type of laboratory could conceivably write its own unique 
monitor system to fit the various levels of instrument usage which is 
conducted there. The five levels of activity found in typical laboratories 
is shown in Table I. 

Relevance of 1800 & 1130 

The ability of the 1130 and 1800 to satisfy the demands of the LAB System 
applications can be summarized as follows: 



Hardware: 

The OEM and SAC channels on the 1130 allow this machine to accept an 
analog or digital I/O (instrument based) front end. At least two manu- 
facturers have announced A/D converters which can tie to the 1130. 

Software: 

No IBM TSX monitor exists for the 1130. However, it is known that at 
least three users are writing I/O subroutines to support an ADC front 
end. It is also known that two 1130's are tied to x-ray and neutron analyzers 
in a closed loop fashion under some monitor system. 

1800 

Hardware: 

The I/O flexibility of the 1800 makes it an ideal growth system for laboratory 
automation programs. The newly announced digital multiplexor RPQ allows 
data to stream directly into assigned core memory locations on a demand 
reponse basis at data rates of 50K words /second. Thus each experimentalist 
will think he has a computer always available to him during his asynchronous 
method of operation. 



Up to 50 chromatographs at one user's laboratory are now operating under 
the 1800 f s TSX. The GCs are connected to the 1800 via the 1894 System 
Engineering LAB special automatic gain change ADC front end. 
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Software: 
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Laboratory Automation in IBM 

IBM has now in progress at its own technical centers a number of 
laboratory automation programs in support of its own research 
requirements. 

An 1800 at the Thomas J. Watson Research Center is tied 
to an x-ray diffractometer in a closed loop fashion. In addition, a plate 
film reader is also connected. At IBM's San Jose Research facility an 
Electron Paramagnetic Resonance Spectrometer is tied to an 1800 also 
in a closed loop mode. In both cases, the 1800 ! s are controlling the 
experiment. Both facilities plan the attachment of additional instruments 
in the future . 

These IBM research laboratory automation efforts have generated two 
differing operating systems approaches to facilitate the interaction 
between multiple different instruments and the 1800, The main features 
of these operating systems is a so called "Lab Director Program' 1 which 
satisfies the demands of slow response analytical instruments in the basic 
research environment. 

These LAB directors are written to allow the computer to respond to 
the various tasks associated with each type of instrument in an efficient 
manner; i.e. , not under complete TSX control. So long as no interrupts 
arise, the LAB director allows the 1800 to handle multiple different 
instruments with relative ease. Modes of operation under the LAB directors 
are as shown in the following diagram. 
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c » o * « serial. tasking 

random tasking 

in equal or variable time slices 



Multi-Tasking 
Lab Environment 
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Summary 



In summary, one finds the researcher or other lab personnel in the 
process of modifying the existing TSX for the 1800 to adapt it to his 
particular laboratory needs . Type III application programs for the 
gas chromatography mass spectrometer, and I nstr on tensile strength 
tester have been written by IBM and run under TSX, A plea is made 
to COMMON members to put in PH) their instrument oriented application 
programs . 




Table I 


PILOT PLANT 
OPERATION 


QUALITY 
CONTROL 


COMPONENT 
TESTING 


MATERIALS 
ANALYSIS 


BASIC 
RESEARCH 


Basic operational 
philosophy of on- 
line computer 


frequent changes in 
a large math model 
program' - low 
batch demands 


infrequent changes 
to program, com- 
puter dedicated. . . 
no background 


frequent changes 
in small 
programs 


infrequent 
changes in 
analysis routines, 
frequent roll in & 
out of analytical 
subroutines 


frequent changes in 
programs associated 
with wide variety of 
experiments q 


Instrument 
Characteristics 


Slow response, wide 
variety of "process" 
instruments plus few 
analyzers 


slow response, 
multiple instru- 
ments of one or 
two types 


wide response 
range, mainly 
slow. Generally 
one instrument 
type to satisfy 


slow response 
insts . , are 
general wide 
variety of 
analytical insts. 


wide range of inst. 
response + wide 
variety of instrumenl 


General philosophy 
of system operation 


to get the most out of 
the pilot plants 
performance 


to get the most 
out of the insts. 
with as few 
technicians as 
possible 


to recognize 
faults in products 
final assembles 
& components 
as soon as possible 


to get the most 
out of instruments 


to get the most out 
out of researcher 


Turn Around 
Requirements 


Seconds 


Minutes 


Seconds to Hours 


Minutes 


Milliseconds to 
Seconds 


Computer Tasks 


data acquisition 
optimization 


data acquis, 
limit checking 
report generation 


data acquisition 
performance 
summary report 
generation plotting 


data acquisition 
data cleanup 
table look up 
report generation 


data acquisition 
data analysis 
data storage & 
retrieval experiment 
control 


Monitor 

Characteristics 


none - process 
demands will 
use computer 


scan instrument 
at fixed time 
interval - no 
interrupts 


scan instruments 
at fixed time 
intervals - rare 
interrupts 


scan instruments 
at fixed time 
interval when 
CPU is interrupted 


demand response 
mode necessary. . . 
no time for monitor 
overhead 


Instrument Usage 
Factor 


100% 


85-90% 


100% 


50-60% 


10-15% 



GENERAL OPERATIONAL CHARACTERISTICS OF LABORATORY OPERATION 
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LAURA AUSTIN 

DISCUSSION 

A CALL WAS ISSUED FOR PROGRAM CHAIRMAN AND LOCAL ARRONGEMENTS 
CHAIRMAN. BOTH WERE LOCATED FOR THE PHILADELPHIA MEETING FOR 
SEPTEMBER, 1968. WE STILL NEED BOTH FOR CHICAGO IN APRIL, 1968. 
FUTURE SITES WERE LISTED AND DISCUSSION WAS HELD REGARDING CONTENT 
AND FORMAT OF MEETINGS. 
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TITLE: A 1620 Computer Program for A. C. Circuit Analysis Utilizing 

Transistor ,t Y ,t Parameter Equivalent Circuit Modeling Techniques 

Authors: Daniel 0. Lampone, Sr. Engineer 

Edmund E, Colan, Research Engineer 
Sylvania Electronic Systems -Central 
Wehrle Drive and Cayuga Road 
Williamsville, New York 3.1*221 

I. INTRODUCTION 

This paper presents a simple but accurate method of obtaining circuit 
A. C. analysis by use of the IBM 1620 computer. The unique feature in this pro- 
gram utilizes the transistor in its "Y" parameter equivalent circuit and some 
circuit transformation techniques to allow insertion of program input informa- 
tion in a normal topological manner. The need for the use of "Y" parameter 
representation became apparent when problems were encountered using a predecessor 
program employing mesh current analysis and the transistor "h ft parameter model for 
high frequency problems. High frequency representation of the 'V parameter model 
utilizing discrete components for the complex quantities created problems in cir- 
cuits involving tuned amplifiers. Details of this will be presented later. Another 
reason for resorting to the tt r" nodal analysis was that most vendor's information 
specify ,I Y" parameters for high frequency transistors. In the mesh current method, 
inaccuracies resulted when converting ,f Y" parameters to "h" parameters since con- 
version formulae were approximate. Before getting into an actual circuit solution, 
let us quickly illustrate the basic °Y n model and sample nodal setup. Figure 1 
shows the basic four-terminal "Y" parameter equivalent circuit. The use of the ,t Y" 
parameter equivalent circuit is essential in nodal circuit analysis since units of 
current must be maintained, with the solution of nodal voltages being the outcome 
by matrix algebra. This is illustrated by reference to the example passive circuit 
and nodal equations shown in Figure 2. 



-1- 

4o4 




e 




EQUATION S *. 

E| (2G, + ^*C Z ) + E Z (-6,) +E 3 (0) * e&, 

E| (~&0 + E 2 (G, + G L + ^iuC,) +E 3 (- 1 w)C,) = 

E, (0) + Ez ( — |U>C,) + E 3 (2 jwC, + G 2 ) = e-jUJC, 



FIGURE Z 
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The matrix solution is [e] [y] * [ijwhere the coefficient matrix is 
made up of admittances rather than resistances in a mesh current solution. The 
right side of the equation is current sources associated with respective nodes, 

II. A.C. EQUIVALENT CIRCUIT SETUP 

This discussion will be centered around a sample RF amplifier circuit 
shown in Figure 3. The circuit has been simplified for purposes of the ana* 
lysis» Decoupling networks, d-c biasing components, ana AGC circuitry were re- 
moved since they have no effect in the a-c analysis. The circuit consists of twa 
cascoded pairs of transistors and four tuned circuits (varactor tuned). Figure h 
shows the a-c equivalent circuit with all circuit components and parameters modi- 
fied by "turns -ratio squared" factors to allow for elimination of circuit ideal 
transformers. 

It would be best to interject at this time how to arrive at the a-c 
equivalent circuit since the success of the solution hinges greatly on the correct 
methods used at this point in the analysis. It was necessary to do some hand cal- 
culations because of the limited capacity of the 1620 computer or else we would 
be into the category of a highly complicated a-c analysis used in the more pub- 
licized and more automated programs allowed by the larger computers. Certain 
steps must be followed in setting up the a-c equivalent network in order to show 
how to arrive at Figure h. First, starting with the original circuit, substitute 
the equivalent circuit of the transformers. Most methods for these were taken from 
"Communication Networks", Volume 1, by Guillemin. The obvious intentions were to 
arrive at an equivalent "T -network" and the following example and Figure kk shows 
the steps taken. 
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FI6UR E 4 
A C. EQUIVALENT CIRCUIT 



Y ne , = (€.4.?- j-43) Xl0" 3 MHOS 
YZB - (- 27-^ .51) 
Yz.i B » (-60 + ^.4-9) 
^226 « (.tl + ^.M 



b ll = R i + ^ 

b 22 = R 2 + 

= jwM = b 2l 

Defining the Mutual Inductance as Negative Numerically 
(Arbitrary; for convenience only) 

we can say: 

b ll I l " h 12 J 2 = E l 
-b 2 ili + b 22 I 2 = E 2 

One type of network which can be made equivalent to the transformer 
is shown below. It consists of the T-network and an ideal transforme 
Various special forms result by giving the ratio "a" of the ideal 
transformer particular values. 




IDEAL 
TRANSFORMER 



Figure UA 
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For the T- structure alone: 



(Z A + 



or: 



(Z A + ZcJIjl 



Z C Z B + 



If this netvork with the ideal transformer is to be identical in behavior to the 
original transformer in Figure kk, then, 



— = b 



12 



ZA + Z C = b ll 



H + Zc = b , 



22 



which gives 



^11 " ab 



12 



Z„ = 



= o2 



22 ~ a ^12 
ab 12 



= R x + jwL! - JvaM 

= a 2 (Rg + jvL 2 ) - JwaM 

= JwaM 



Therefore we have the circuit in Figure 1+B: 



— VvNAr- 



•I 



•O.M 



-qnnnr* nnnrv. 



E, 



o — 



a" L2. 




Figure N£ 



IDEAL 
XFORMER. 
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One must keep in mind that the transformer conversions need only be 
derived once and retained for reference in anticipation of future problems in- 
volving transformers. Initial preparation of these equivalent network* of 
transformers is painstaking but nevertheless valuable* 

By assigning any value to the ratio a, we immediately have the impe- 
dances in the T-structure to be used in conjunction with an ideal transformer 
having this ratio in order to replace the given transformer, 

A special case: when we make a = 1 the ideal transformer vanishes 
(this is the case for a 1: 1 transformer). 
Then we have: 

Z A « b n - b^ 
Zb - b22 - -bl2 



z c = b^ 



and this is: 



Z A * R x + jw(L x - M) 

Z B - R 2 + jw(L 2 - M) 
Z c « jwM 

This result is illustrated in Figure as follows: 

o wi 4nn — t nrmn wv 



M 0L~ 



Figure kC 
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Our original circuit also showed step-down and step-up auto-transformers* 
For purposes of brevity, the solution for the equivalent circuit of the auto- 
transformer follows without detailed discussion in order to approach the next 
point. 




b ll = R l + R 2 + J V ( L 1 + L2 + 2M) 
b 22 = R 2 + J wL 2 
b 12 = b 21 = R 2 + J W ( L 2 + M ) 

l2 




X 2 

(Z A + - Z c - -E 1 

rZ C T + Z B + ,& C t , E 



-9- 



per above: 



l k + Z c = b n = R-l + R 2 + jw(L 1 + L 2 + 2M) 



h + z c 



- b 22 « R + jwL 2 



Substituting: 



Impedances are: 



t = b 12 = b 21 = R 2 + J W(L 2 +M ) 
Z c = a[R 2 + jw(L 2 +M)J 

Z A = R x + R 2 + jw(L! + L 2 + 2M) - a |r 2 + jw(L 2 +M)| 
Zg = a 2 (R 2 + jwLg) - a[R 2 + jw(L 2 + M)f 

Z c = aR 2 + aL 2 + aM 

Z A = R x + (l-a)R 2 + L x + (l-a)L 2 + (2-a)M 



Z B = (a 2 -a)R 2 + (a -a)L s 



aM 



which yields the following equivalent circuit shown in Figure kD: 



(i-o-)Kl L, (l-£t)L 2 (z-ct)M (a?-a)R2 («. 2 -a)L 2 -aM 
aw\ nmo qnrjp — annr> — * \wv — nrrr\ nrm— 



O.L2. 



O- 



(ft.) 



IDEAL 
TRANSFORMER. 



Figure UD 



Step-Down Autotransformer 
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As you can see, each equivalent circuit of the transformers includes 
an ideal transformer. Tbe next step is to eliminate the ideal transformers in 
order to avoid discontinuities in the circuit solution* In order to eliminate 
ideal transformers all components succeeding an ideal transformer must have im- 
pedances modified by the "turns -ratio -squared" factor j^jpj ? * 

Now, looking back at Figure k, the circuit was split up at four dif- 
ferent points where the ideal transformers should have existed. For this circuit 
the following turns -ratios existed for the four transformers: 

a x = .39^ a 2 - l.h2 a^ « ,222 = U,88 

As shown on Figure k 9 the first section impedences succeeding the first ideal 
transformer get multiplied by .39 1 * 2 = .155, the following section by [( 1. 12) 2 ( . 155)] 
and so on* Notice, the multiplication factors become cumulative for section after 
section. This is an absolute necessity since the source generator must see all 
components in the proper perspective. 

Conversely, it becomes necessary to modify the f, Y lf parameters of the 
transistors (admittances) by multiplying and Y22 *>y V a2 > Y 21 v l anc ^ Y 12 v 2 
l/a. This can be understood easier by observing the following calculations. 
For the 2N3933 of the first cascoded pair: 

ixi« — L- x — L * i # 785 
*1 &2 *39* 1.^2 



a i a 2 ,313 
Now: 



Y 1JE * (1.1x10-3 + j 2xlO-3)3 # 2 » 3.52xlO" 3 + j i3 # l^ 2 xl0" 3 
Y 12E * (° xl0 " 3 " J* 16x10*3)1.785 - - j,285 x 10" 3 
Y 21E * (51X10" 3 . j 13xl0" 3 ) 1.785 « 91?clO" 3 - j 23.2xl0~ 3 
Y 22 e = (.015xl0~ 3 + j # Uxl0"3) 3#2 - ,0U8xl0"3 + j 1.28x10-3, 
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The same multiplication factors apply to the common base 2N390^ of the first 
cascoded pair* 

For the second cascoded pair, the same process is carried out, only 
now the multiplication factors obviously become: 

ixixi * _ip x -L- X JL_ « 8.06 
a l a 2 a 3 •395* 1. k2 .222 

i « 65 

a l a 2 a 3 

We now arrive at what looks like Figure U, the a-c equivalent circuit. 
The foregoing set-up seems a little messy (yet straightforward) but after exper- 
ience with a couple of circuits, adeptness, efficiency and accuracy are very much 
enhanced. 

III. PROBLEM AREAS 

Minor problems existed and we will now, discuss them. 

Originally, it was intended to solve this circuit by the loop (or mesh) 
current method using the "hybrid" equivalent network for the transistor. The 
"hybrid" equivalent network is shown in Figure 5 with a few rules governing its 
insertion into the circuit, This "h" equivalent was derived from information 
contained in the text "Transistor Circuit Analysis and Design" by F.C. Fitchen. 

The information in Figure 5 is only included as extraneous information 
to serve as a guide in cases where choice is made to apply a mesh current solution, 
for example, low frequency analog circuits. 

As I previously mentioned, most vendor's information gives "Y" parameters 
for high frequency transistors, and these are given in complex quantities. Con- 
verting to "h" parameters is necessary to perform mesh current analysis and these 
obviously become complex. Utilizing discrete components for the complex quantities 
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Collector. 



EMITTER 



Circuit Insertion Rules 

1. h rb* V c^ is alwa y 8 8ame as v i in si 6n» 



2. 



3. 



5. 



Polarity of .i^ must always be related to v A as follows: either, 
h ob 

both must be positive at collector and base (terminals) respectively 
(as shown in sketch), or both negative at these terminals. Base current 
(i^) must- be consistent with v^. 

v cb is interpreted as voltage at collector relative to base. Polarity 

h-f*V\ 

of the voltage generator ( . ±J) is indicated (as determined in 2). 

Voltage drop and polarity in resistor f ^ is determined by direction 

bob 

of current flow assumed for i c . 

When inserting parameter data into equations, don't forget that h fb 
is negative. 

The generators will take on polarities with respect to loop currents 
according to the following manner: 



Loop current 




~~ Loop current 



Figure 5 
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created problems where tuned circuits could interact with the transistor capa- 
cities. Reference to the grounded base configuration in Figure 6 will illustrate 
this. 



EMITTER COLLECTOR 




j> BASE 



Figure 6 

The capacitor C-^ and resistor Rl are the components resulting from the conversion. 
During computer solution, Cj_, which is small, resonated with the combination of 
Cg and L£. C2 and formed a high value of rather than a high resistive 
value for the tuned circuit. Consequently, while attempting to tune a circuit 
for maximum output voltage, the solution proceeded to find the peak series reso- 
nant point rather than the antiresonant point which is desired. The series re- 
sonant point causes a much higher output voltage, E Q , than the parallel peak. 
(This can be demonstrated mathematically). This is a false resonant condition, 
even though E is higher, because of interaction between transistor parameters 
and actual external tank circuits. The series resonant peak is close to the 
antiresonant peak and the skirts of the response curve blanket any identification 
of the actual circuit parallel resonant condition. Conversely, a solution for 
antiresonance by searching for the minimum loop current does not succeed because 
C-^ eliminates the occurrence of the current "dip"* 

41i 



Attempts to utilize a current generator in the h -parameter transistor 
model with paralleled hg 2 components were not successful* Introduction of the 
current generator - or any equivalent alterations - could not be made compatible 
with the loop analysis* 

Therefore, without the success of using the "h tf equivalent loop (or mesh) 
current analysis, we proceeded to investigate the "Y" equivalent nodal analysis* 

Some nodal analysis problems also occurred but were "ironed" out after 
some proper manipulation. It so happened that with the circuit previously shown 
containing two (2) pairs of cascoded transistors, it was found that the input 
admittance of the second transistor in the pair (the grounded base) loaded down 
the grounded emitter transistor output so that a loss resulted rather than a gain 
across the pair* This problem was circumvented by combining the transistor data 
so that two cascaded transistors are combined into one single model to represent 
the cascoded pair* 

The combined admittance matrix takes on the following form: 



Y 1 = 



Y v yi2 B 

y 2ie y Q 



where y Q = y 2 2B 



Y 22E +y llB 

The new combined "Y" model of a common emitter - common base pair has its elements 
varied by the above formulae (the Y^-, and ^22F remained unchanged obviously). 
Another small problem that occurred in the process of determining the y-parameters 
for a cascoded pair is where the grounded emitter transistor has a degenerating 
emitter resistor. The emitter resistor is combined by matrix manipulation as 
shown in Figure J, 
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FIGURE 7 



A short computer program was written to accomplish what is shown in 
Figure 7« The y- parameter data initially used was the transistor data modified 
by the "turns -ratio squared" factors to fit the A*C. equivalent circuit with ideal 
transformers removed* This modified data was then combined with the emitter re- 
sistor value to obtain the resultant matrix for each cascoded pair* This method, 
however, yielded improper parameter data* Oddly enough, this particular problem 
was rectified by reversing the order of solution* By first combining the basic 
transistor data with the emitter resistor and then modifying by the "turns-ratio 
squared" factors, the proper data finally resulted for the cascoded pair* 

By combining the transistor data for each cascoded pair, the circuit 
reduces to a 12 node problem. Figure 8 shows the new revised areas containing 
the resultant combined "Y" parameters of each cascoded pair* The emitter re- 
sistors have now been combined into the new "Y" parameters representing each 
cascoded pair. 

IV. COMPUTER PROGRAM 

The final category that will be discussed is the actual computer input 
data set-up. With most people this should be elementary since matrix algebra 
determines the final solution and a little knowledge of circuit analysis can 
aid the programmer in inputing the information. The technical portion that I 
have previously discussed would probably need the assistance of an engineer to 
properly set-up the a-c equivalent circuit* But again, practice with a few 
circuits would lead to more familiarity and shorter turn -around time. 

An explanation of presenting the input information follows* By re- 
ferring to Figure 9 and Figure k with the combined cascode pair configuration of 
Figure 8, the input information is easily understandable. 
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Read cards order: 

1st card: N and Frequency 

where N * number of nodes 
2nd set of cards: II, JJ, R, XL, C, ITYP (Impedance Branches Only) 
where: II * matrix row element (node number) 

JJ = matrix column element (node number) 
R, XL, C = resistance in ohms, inductance in henries, 
capacitance in farads associated with II, J J 
impedance branch. 
ITYP « if symmetrical, 1 if asymmetrical 
All impedance branches are symmetrical* The YV (current generators) branches 
are sometimes asymmetrical and will be assigned as such when we present the ad- 
mittance branches later. By looking at Figure 9 and Figure b, three branches 
are common to node 1 and must be listed separately in the 1-1 position. The 
program combines these in the final 1-1 position in the coefficient matrix. A 
branch need not be repeated when symmetrical and off -diagonal (for instance the 
1-2 common branch) i.e., the program makes A (II, JJ) 85 A ( JJ, II), however, 
the off -diagonal elements should be assigned a minus (-) sign. Also, the program 
converts all these impedance entries to admittances in complex notation to keep 
the matrix solution in proper units. Notice II cannot be larger than JJ. 
3rd set of cards: Follow these cards with a blank card. 
Uth set of cards: II, JJ, YR, YI, ITYP of Y parameters (admittances) 
where: II «= matrix row element 

J J - matrix column element 
YR = real part of Y parameter 
YI == imaginary part of Y parameter 
ITYP - if symmetrical, 1 if asymmetrical 
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In this set of cards, II can be larger than JJ. This happens in the 
case of current generators which must be assigned ITYP ~ 1. The reason for making 
tfiis asymmetrical assignment is to prevent the program from switching the element 
from the A(II, JJ) position in the matrix to the A(JJ, II) position since the 
generator looks like an off -diagonal element. Switching should not happen in 
the case of off -diagonal current generators in the '"Y M model because they are 
not symmetrical elements by nodal analysis theory. 

NOTE: For current generators, direction (or sign) is positive leaving node. 
5th ■- Follow these cards with a blank card. 
£>th set of cards: J, VR, VI 

where J = node number associated with source I. 
VR = real part of source I. 
VI« imaginary part of source I. 
NOTE: In Figure 9 this is obviously the source generator (node 1) but 

must be considered current, therefore assuming a one (l) volt source 
and source resistance ~ 50 ohms gives I * l/50 = 0.02 as shown. 
7th - Follow these cards with a blank card. 
8th - End of job. 

The elements marked "tune" represent the capacitors we tuned in this 
circuit to obtain desired results. Different values must be used for these cards 
obviously and program repeated until best results are obtained. This is not too 
cumbersome since computer running time is short (i.e.* a 12 node run approximately 
5 minutes 1620 time). 

Now, for the purposes of practice and application let us create a more 
complicated (but fictitious in this case) problem using the circuit originally 
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set forth in Figure k. The input information is shown in Figure 10. The impe- 
dance branches are straightforward as before and need not be discussed but the 
admittance branches containing the "Y" parameters of the cascoded transistors and 
emitter resistors become much more "messy". For this reason, and in the original 
case which the authors had to do, the "Y" matrix elements associated with respec- 
tive node equations should be set-up as shown in Figure 11. Page 2 of Figure 10 
shows input elements sectioned off by the circled node numbers to serve as a 
guide when looking at the "Y" element equations in Figure 11. Notice, the "A"s 
and "S"s refer to asymmetrical and symmetrical elements respectively. Notice 
also, and as similar in the case of impedances, symmetrical admittance branches 
need not be repeated in input data. 

There are a few sense switch controls in the program mainly for con- 
venience. For instance, Sense Switch 1 On will punch output of coefficient matrix 
and together with Sense Switch 3 will punch out input matrix. Sense Switch 2 will 
reinvert matrix once after initial inversion. Sense Switch k'On will not punch 
out R, L and C *s and all final admittances. Initially, as we generally do, leave sense 
switch k off in order to cross check admittance values with possible slide rule cal- 
culations. Then after beginning to tune circuits, putting Sense Switch h On will 
produce only final node voltages. This saves time getting punch bound. 

The foregoing discussion is complete as possible and should provide 1620 
users a convenient engineering tool for solving A-C circuit analysis. It has been 
the intent of this paper to provide 1620 users with a method to solve difficult 
problems such as the R.F. amplifier presented which can normally be solved by 
larger computers and more complicated programs. 
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Figure 11 16 Rode RF Amplifier 



5 
ui 
J 
to 

2 



CL 

< 
uj 



a. S 

5 o 

< Z 

^ -J 

6 _ 



o 

g 

V- 



.uJ 



2 

r~y* — * 



O O O C O ; O OO O O CIO o o c !o- o 



O] j OJ OJ OJ OJ C\j j<VJ 0] , 

*~* 4 «-»« : 

I I I I I ill I 

iJi Li bJ It j LlJ UJ rLU LU 



• • :ir. 

• m • o U i : • in 1 

5 n in ■ co n • ;\o • 

• ♦ . . • ; • in ^ tp io \o : • • ! • • 

c si c o a ;c - i ^ oj oil o o o o c 



! ! : uJ 

i 2 ; 

o do o o ojo o o c o o 



O O O C O C ! o o o c o 



CVJ 



■n - 

si < 



c coco o 



UT' vO vO fvO vf) ! v0 vO 

c ;o o io o o c 

ii i 1 1 ii i 

Ir Ir li' iUJ UJ ii! 11 1 



■ r) 

a- a- a* ^ n ^ d 

a ir a !o o oj 0' 

t< c u r: o: o o 

• C • • O :0 o • o 



o o 



I 



|v0 vO vO \0 vO 
C fO C O O O 
111 I I I I 

U 1 <LJ lii IlI 1U :IjJ 



a co \o vf) oj 

li. iO 10 st (V c 

O IC C vO U :0 

C , • O O o 



If 

cr 



o 

o 



c o c — • o o 



\\C vO -VP vO sO IvO 

O C jC c to O |C 

I I 4 11 I I 

UJ 111 ill. U' liJ UJ |Ui 



.;vfi 



I ♦ o 



I 



: I O 



vo c *n r»- oj 

vo c or. o O - 

o: a c a; kD c 

C C O C ' o c 

c o i • o a • 



l 



I 



a) 
c 
I 

; 0J 

: o 
o 



• o i c c a ic o c o 



o o c o ~- o jc o o o o 



vD :vC ^ O ^ *0 

CMC C O C C 

I ! I ! I I 1 

U |tJ; Ii. UJ It Ui 

tf II; vf) <j O 

e jo. c cr.; o %f 

tv: sr: nj oi <s -h 

c !r. o c o 

• o ; • o o o • 

c > • j i • • • i 



;C, 
i + 



n ; 

i 

P C v( : 



<d a ^ ' 

a a* a i 

• o • o • 

C • I • < s 



0^ 

av CD 
• I • c 



0) 0} ^ <Vf 

c in o v) oj U) r; 

c jo c oj m o *-< 

• jr. • ^ <; » • • 

l i • I = • •in 



r 



vO 

r; ID 

^ r> r d p (\ 

cv, h- j • o.: 

li i • ;<r • o c 

c xi <i o o 



^ (v a; lev. ai n d d si* <t sr *o ui vo oj lo^ o- o ^ — cvi t\ r. <i <j 



N ^ : 



o.: k l oj oj n n n h <t si si- <t u; 



fcvr 

cv m cvi 

<i o, ! 
:> c o 
• ♦ o 

1 ~ • 



0; ^ in 

• V; CKi SO"- t-* 

c: oj | pi • 



si 

If si 

ir 



;sl- - 

nJ si 

iO ^ 

c : ♦ c 



a: 

a 

<j c 



I ♦ o 



si vl K If; U; ir v£j 



a a: a a p> o ^ ^ K; o ; r i <i < |<j kj ir. if ( ir^ 

? *M «m4 * «~« ir-* *-* *-< •*< »- , < *H t«M 1 ( *-* #— J 



-25- 



o o 







© 



n2 x 



o 


O 


o 


e 


! ° 


a 


o 


O 








c 








O 


o 






c 


:Q 






c 


o 


o 






c 




< 






o 




c 


vT 




0' 


V; 




r 




D 


m 


t; 


Ir- 


r> 




n 


n 


r, 


n 


C) 


in 


m 




0. 


t: 


r ,( 


IT; 


n D n jn 


n 


in 


T> 


T 


n 


n 


i 

T; n 


T; 


c 




c 


c 


!v 


o 


c 


C 


c 


c 


i c 


c 


o 


o 


c 


c 


c 


O 


c 


c: 


o 


o 


c 




:C 


O ;C o ic 


o 


! p 


O 


■■o 


c 


c> 


o jo 


C 


1 




1 


1 




\ 


1 


t 


1 


1 


i I 


I 


1 


f 


I 


i 


I 


1 




i 


1 


1 




1 


1 


1 


; i i 


1 


t 




I 


1 




i 


1 I 


I 


li 




Ui 


111 




IP 


■ll' 


IP 


L 


u 


: U; 


UJ 


Ll' 


in 


UJ 




uj 


Ll. ' ll 1 




Ll. 




u: 










UJ 


u. 


u 


UJ 


Lu 


Ui ILI 
























j 














































« 






c 








;in 


0. 




cc; 






L 




If: 




(V 




• 














* 




o • 








• 






O 












a.. 


; a" 


• 


• 


a. 


1] 









a: 


(V! 


: » 


o: 






■ • 





• 




a 


• 




• 


a ix i 


°. 


• 







. • 


c: 


• 


^ 






• 


0. 


0- 




r 


• 


a 


* 


ja 


• 





• 


r 


(V 


n 










• 




IT 




vc; 


• c 








C: 


u. 


• 




• in 




c 


• 


V : 


• 


• 


c 


< — i 




tv 


r 






• 


T) 




• 


*— < 




oc 


• 






• 


O 




CVJ 


1 r-i 






• 


« — » 


c 


v0 jCVi 






• 


c. 








l 


l 


1 


• 


cv 


■ • 

\ 






a; 


I 




i 


• 


1 






c\ 






1 


1 


1 1 


7 


OJ 




1 




(V 


I 


i n 

i 


tr. 






r 


r. 












r 


\ . 


r; 




V) 


n 


r 


r; 


(\ 


V) 


r 


Tl 


r 




t: 


T', 


r 


T) 




Ti 




n 


t: 


r; 


n 


n n 


T 






t 






c 


o 


o 




t 




o 




a 


O 


a 


c 


C 


o 


c 


O 






r 


,o 


c 


O 




O 




o 


c 


c 


o 


c o 


C 






1 


l 




1 


l 


I 




I 




1 




I 


i 


I 


I 


1 


1 


l 


1 


1 




l 


1 


1 


1 




1 




I 


1 


1 




1 I 


1 






LP 


IP 


i 


ll 




IP 




It 


! 
! 


U 




IP 


tl.: 


Ul 


h 


!i ? 


ll ! 


ii 


it 


b 




u 


:li 


U' 


UJ 




IM 




UJ 






LU 


It ! UJ 


U 














o. 


a 






j 


























• 


h 


h 












• 




• 






u 


v' 


(\ 


n 






IS) 






• 




(> 




« 




a 


• 


(V 


• 


U; 


r 


r 








r 


• 




^ 




• 






C:- 


^ h 






• 


LP 






♦ 


• 










u. 






• 


<j 




a 






• 


r 






H 








• 






.t-H 




:> 


• to 


• 


V. ' 




• 








T; 


• 


. • 





! • 


• 


♦ 


o 




c 


t. 






0' 







• 






• 




• 




• 






a 


or 




h 


• 




T) 


• 


:( 




1 


1 


c 


i 


i 


T; 


c 


1 




• 


OJ 


• 




« 


h 


• 




1 


1 


i 


C 


c 




P 




1 


• 


«t 


* J 






U 




i 

lb) 


li: 




r 


r 




;t( 


vP 




10 


M 






a 


h 


a- 


o 


c 




( 




CV; 


<v - 


I': 




a. 


c 








n cvj 


T; 


t— < 




















| 






















<s 
1 




























vT 




li 


IT 


u 


u; 


LP 


u 


ir 


U 


At. 










r- 




r 


a*.- 





C' 


c 






o 


C 


c c 










<\! 


c\; 




<v> n 


T 











































































-26- 

4a? 



SESSION NUMBER F.2.2 
SPEAKERS 

HARRY CADOW ON 360 OPERATOR TRAINING. 

GARTH GROFT ON OPEN SHOP OPERATION IN AN ENGINEERING 
DEPARTMENT. 



4£f 



OBTAINING MAXIMUM RESULTS USING A COMPUTER 
FOR ENGINEERING DESIGN 



by 



Garth E. Groft 



York Division, Borg-Warner Corporation 



ABSTRACT 



For more than five years a major manufacturer of refrigeration and 
air-conditioning equipment has made comprehensive use of an electronic 
computer as an engineering toot. Its use is directed toward increasing 
the productivity of the design and test engineers, thereby reducing 
the cost of engineering. 

It is well known that a substantial part of engineering is involved 
with tedious and repetitive calculations. Much of this work can be 
done more quickly and more accurately by a computer. Both the quant- 
ity and quality of product design and development are enhanced as 
faster, more accurate, solutions allow more time to explore a wider 
range of design possibilities and to conduct more extensive test 
programs . 

The facility is operated on an n open shop" basis whereby the engineers 
have direct 24 hour/day access to the computer and are encouraged to 
use it as freely as they do a slide rule. Courses are frequently given 
to train the engineers so that they themselves can program and operate 
the computer. To date, 94 engineers have completed the courses. This 
arrangement minimizes the number of steps in the communication chain, 
and has resulted in a most effective use of the computer for design 
and development work. This paper discusses in detail the manner in 
which an "open shop" operation is achieving outstanding results. 
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OBTAINING MAXIMUM RESULTS USING A COMPUTER 
FOR ENGINEERING DESIGN 



by 

Garth E. Groft 



York Division, Borg-Warner Corporation 



For more than five years a major manufacturer of refrigeration and 
air conditioning equipment has made comprehensive use of an electronic 
computer as an engineering tool. Its use is directed toward increas- 
ing the productivity of the design and test engineers, thereby 
reducing the cost of engineering, 

PURPOSE OF THE ENGINEERING COMPUTER 

It is well known that a substantial part of engineering is involved 
with tedious and repetiti ve ca leu lat ions. Much of this work can be 
done more quickly and more accurately by a computer. By using the 
computer, the engineer is no longer limited to approximations, over- 
simplified formulas, and short-cut methods that have been in wide 
use for many years. The computer can be programmed to include 
equations in their entirety and to consider factors that previously 
had to be ignored. 

The computer provides more rel iable, more consistent results. The 
engineer is assured that a computer program will repeatedly handle 
data in precisely the same manner - that is to say, all calculations 
are performed the same way each time the computer is used. Hence 
all data has a common basis of analysis. He is further assured that 
the computer is not subject to errors caused by distractions, nervous 
tension or fatigue. 

Both the quality and quantity of product design and development are 
enhanced, as faster, more accurate, more reliable solutions a I low 
more time to explore a wider range of design possibilities and to 
conduct more extensive test programs. The computer has contributed 
significantly toward reducing the total design and development time 
cycle. The effectiveness of the computer in saving time is empha- 
sized by the fact that the work being done by this installation is 
equivalent to an additional staff of more than 40 engineers using 
slide rules and desk calculators. 
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GROWTH OF THE FACILITY 



The first engineering computer faci I ity was an IBM 1620 Model I Paper 
Tape System, installed in December 1961. Acceptance of the computer 
as an integral part of engineering was exceptionally favorable. This 
was due largely to the extensive personnel conditioning, training, 
programming and general preparations which took place before the 
equipment arrived. The demand for the computer quickly exceeded ex- 
pectations as well as its capacity, necessitating upgrading just a 
year later, to a faster, more efficient card system. The core stor- 
age was also increased from 20,000 to 40,000 6-bit digits. This 
provided sufficient thruput until early 1966. Additional capabilities 
were then provided by converting to a 1620 Model II having twice the 
speed of the Model I. This system provided more effective operation 
and permitted a higher level of programming capability. A later ap- 
praisal of future engineering computing needs and proposed improvement 
in test data collection equipment and techniques dictated the further 
change to an IBM 1800 Data Acquisition and Control System. This was 
instal led in Apri I , 1967. 

The 1800 is ideally suited to engineering use. It can execute both 
process control 'and non-process control programs concurrently. Batch 
processing and time sharing at the computer console or from remote 
terminals is provided by the system. The system software and most of 
our program library reside on two disk packs of 512,000 words each. 
A core storage of 16384 16-bit words was found to be equivalent to 
some 50-60,000 digits. We have also determined that for our work the 
1800 is 2-1/2 to 3 times faster than the equipment it replaced, or 
about 15 times faster than the original tape system. 



COMPUTER TRAINING COURSE 

Frequent courses are given to train engineers so that they themselves 
can program and operate the computer. These 50 hour courses are 
divided into two-hour sessions, so as to minimize interruption of the 
engineer's regular work. The first part of the course presents 
1800 FORTRAN. 

Because FORTRAN is machine independent, the engineer can be problem- 
oriented, i.e., he can direct his attention toward the method of 
solving the problem itself. The FORTRAN language is quickly learned 
and a program can be written with relative ease. Examples of FORTRAN 
statements from actual programs are used in these sessions to illus- 
trate the f lexi bi I i ty and practicality of the FORTRAN language. In 
the interest of sav i ng tra i n i ng time and avoiding confusion, the 
design and internal workings of the computer are pointedly avoided. 
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The second phase of the course concerns the three major areas of diffi- 
culty which tend to discourage our engineers from writing computer 
programs: 

1) . Methods for representing tabular or graphical data in a 

computer program, 

2) Techniques for solving trial and error problems, and 

3) Means for referencing properties of refrigerants and 
other fluids. 

Curve fitting and surface fitting techniques are presented as a likely 
method for representing graphs and tabular data which form smooth 
curves. The applications of table look-up procedures are reviewed. 
Normally this approach is not recommended as the equations resulting 
from curve or surface fitting are easier to program, require less 
storage and generally provide faster, more accurate results. 

Techniques for solving trial and error problems are treated in detail. 
The advantages and disadvantages of various methods are explored in 
detail with actual programming examples. 

Sub-programs for the properties of commonly used refrigerants have been 
written from equations developed by a major manufacturer of refrigerants. 
These same equations generated the tabular refrigerant data frequently 
used in manual calculations. These properties can be referenced freely 
in any program and are as easy to use as sine, cosine, and square root 
determinations. 

Examp les : 

Pressure of saturated liquid PI = PFT(T1) 

Specific volume of saturated vapor V1 = VPT(P1,T1) 
Enthalpy of vapor HI - HPT(P1,T1) 

Enthalpy of vaporization HLAT1 = HFGT(T1) 

Where T1 - Temperature in °F 

PI - Pressure in psia 

The refrigerant properties include acoustic velocity, heat capacity at 
constant pressure and at constant volume; enthalpy and entropy of vapor- 
ization; specific volume, pressure, temperature, enthalpy, and entropy 
of the saturated liquid, and of the superheated and saturated vapor; 
liquid and vapor viscosity; and X and Y compressibility functiQns. 
Other properties will be- added to this set as they are needed. Sub- 
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programs for the properties of water, air, carbon dioxide, methane, 
ammonia, lithium bromide, chlorine, and other such fluids are also 
avai table. 

During the third and final phase of the course the engineer programs 
several typical applications in class. This training is to prepare 
him for the ultimate objective of the course - to write a useful pro- 
gram himself and get actual results on the computer. Experience has 
shown that only by actually writing and running a computer program 
does the engineer acquire good recall of the course content. The 
course throughout avoids the commonly encountered textbook approach. 
Instead, material, examples and illustrations gathered from everyday 
experience are used. 

The engineer continues to receive training on an individual basis each 
time he uses the computer facility. He is given an Enqi neer i nq Com- 
puter Guidebook , an in-house publication which provides detailed pro- 
gramming and operating information specifically designed to promote a 
greater degree of self-sufficiency and improve the overall productivity 
of the engineer using the 1800 computer. 

To date, 94 engineers have completed the FORTRAN course and most of 
these are now making effective use of the computer. Our own Program 
Library has grown to 175 programs covering a broad range of applica- 
tions. The major areas where the computer is utilized are: 



1. Design 

2. Data reduction/analysis 

3. Performance ratings 

4. Physical science 

5. Mathematics, statistics and reliability 

6. Information processing and retrieval 

7. Management science 

8. Numerical paper tape control of machine tools 



OPEN SHOP OPERATION 

Before the initial computer installation, it was recognized that it is 
easier to train engineers to write their own programs than to familiarize 
a machine language oriented programmer with the broad aspects and fine 
variations of engineering design and development. 

For this reason, the computer has always been used on a strictly "open 
shop 1 ' basis, whereby the engineers operate the computer and do most of 
their own programming. Direct 24 hour/day access to the computer is 
provided and they are encouraged to use it as freely as they do a slide 
rule. Computer oriented help is available, however, for consultation 
and to assist in the more involved problems. 
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A magnetic type schedule board is used to reserve computer time. Perman- 
ent reservations are provided for certain test activities which go on 
around the clock. All other reservations are made as needed. Conflicts 
in scheduling or other such difficulties are resolved by computer per- 
sonne I . 

The keypunching of new programs and input data cards is done by a key- 
punch operator. The engineers, however, are trained to punch their own 
cards so that they are able to use the computer after hours without 
assistance. 

The "open shop" operation minimizes the number of steps in the communi- 
cations chain. The engineer does not have to explain his problem to a 
programmer who, no matter how intelligent, resourceful, and eager to 
help, rarely has as much knowledge and experience as an engineer in his 
own bailiwick. The problem of retrieving and relating all pertinent 
information and ensuring that nothing is lost in the translation is 
e I iminated when the engineer does his own programming. While programs 
written by engineers may not always be as efficient as those created 
by programming specialists, the qualitative benefits of "open shop" 
programming far outweigh the disadvantages of any si ightly slower running 
t i mes . 

Like any commercial product, a program is subject to occasional or fre- 
quent revision aS*dictated by technologica I innovations and advances. 
The engineer who does not write his own program frequently experiences 
difficulty and delays in keeping the program up to date. Furthermore, 
as the engineer operates the computer, he acquires valuable feedback 
regarding the effectiveness of his own program and can detect unsatis- 
factory program performance, implement necessary improvements, and 
prevent needless delays caused by incorrect input data. 

Moreover, hands-on experience contributes greatly toward building up the 
confidence of the engineer in utilizing the computer facilities. It 
removes the mystery, awe, and fear often associated with computers. The 
engineer who uses the computer himself no longer feels that it is a 
gigantic brain with which he is in fierce competition. 

This attitude, although diminishing with each passing year, presented a 
real problem with early installations and is still of consequence. Under 
"open shop" conditions, the engineer acquires a genuine appreciation for 
the computer and gradually rea I i zes that, even though inanimate, it is a 
valuable partner in a closely knit engineering team. 

The "open shop" philosophy coupled with "in-house" training has proven a 
most effective approach to computer usage in design and deve lopment work. 
It is undoubted ly the basic reason that this installation is achieving 
such outstanding results. 



G.E.G. 

7/19/67 
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SESSION # MC CRACKEN 1800 FORTRAN LANGUAGE 

REFERENCE MANUAL 







1 


INTRODUCTION 
TO FORTRAN 


CHAP. 1, PAR . 1.1 £ 1.2 




2 


CONSTANTS, 
VARIABLES £ 
EXPRESSIONS 
(INCLUDING SUB- 
SCRIPTED VARIABLES) 


CHAP. 1, PAR. 1.3 - 1.5, 
PROB. 1-7 

CHAP. 5, PAR. 5.1, 5.2, 
5.5 


PP. 1-5, 18 - 19 

(DIMENSION) 


3 


ARITHMETIC 
STATEMENTS 
QUIZ #1 ON 
SESSIONS 1 - 3 
(1/2 HOUR) 


CHAP. 2, PROB. 1 - .3 
CHAP. 5, PROB. 1, 2, 3, 
8, 9, 10 


P. 6 (COL. 1) 

PP. 22 - 23 (FORTRAN 
•SUPPLIED SUBPROGRAMS) 


u 


CONTROL 
STATEMENTS 


CHAP. 3, PAR. 3.4 £ 3.5 
CHAP. 4, PROB. 1 - 13 


P. 6 (COL. 2) - P. 7 

(DO STATEMENT) 

P. 9 (PAUSE, STOP, END) 


5 


DO STATEMENTS 


CHAP. 5, PAR. 5.3, 
PROB. 5, 6, 7, 11 
CHAP. 6, PROB. 1 - 9 


P. 7 (DO STATEMENT) - 
P. 9 (CONTINUE) 




DO STATEMENTS 


CHAP. 6, PROB. 10, 13 - 17 


P. 7 (DO STATEMENT) - 
P. 9 (CONTINUE) 


7 


REVIEW £ QUIZ #2 
ON SESSIONS 1 - 6 
(1 HOUR) 






8 


DISCUSSION OF 
QUIZ #2 
INPUT/OUTPUT 
STATEMENTS 




PP. 10 - 14 


9 


INPUT/OUTPUT 
STATEMENTS 


CHAP. 3, PROB. 1-7 


PP. 15 - 17 

(OMIT MANIPULATIVE INPUT/ 
OUTPUT STATEMENTS) 


10 


INPUT /OUTPUT 
STATEMENTS 


CHAP. 7, PROB. 1, 5, 7, 9 


PP. 10 - 17 


11 
£ 

12 


STATEMENT 
FUNCTIONS, 
SUBPROGRAMS £ 
SPECIFICATION 
STATEMENTS 


CHAP. 8 


PP. 19 - 25 

P. 26 (CALL DATS'/! 
STATEMENT) 


13 

—#!- 


REVIEW 


HANDOUT - PROB. SETS 1-7 


ALL STATEMENTS 



433 



SE 
14 


SSI ON # 

QUIZ rV-3 ON 
SESSIONS 8-12 
INPUT/OUTPUT, FORMAT, 
STATEMENT FUNCTIONS, 
SUBPROGRAMS 
(1-1/2 HOURS) 


MC CRACKEN 


1800 FORTH;*.: ' LANGUAGE 
REFERENCE MAMJAL 

c 


15 


DISCUSSION OF 
QUIZ #3 
CASE STUDY 1 
CASE STUDY 8 
FLOW DIAGRAM 


CHAP. 9, PP. 62 - 63 
CHAP. 9, PP. 73 - 77 




16 
17 
18 


METHODS 
OF 

ITERATION 






19 


GENERAL DISCUSSION 
OF PROJECT 
DEVELOPMENT TO DATE 






20 


COMPUTER DEMO - 
GENERAL SESSION 







21 


CASE STUDY 2 
MOTOR EFFICIENCY 
CALCULATIONS 


CHAP. 9, P. 64 




22 


COMPUTER DEMO - 
WITH CASE STUDY 2 




: 


6. J 


r ACC CTnnv A 
IMoC j 1 UUT 

HEAT TRANSFER PROS. 


fu Ap DP AA — AP 




24 


COMPUTER DEMO - 
WITH CASE STUDY 4 




. m 


25 


TEST £ EXECUTE 
PROJECT PROGRAMS 







SESSION' NUMBER F . 2 . 3 
SPEAKER S 

D. G A P D N F R j n\\\ SUBROUTINE OATAR 



Subroutine DATAR 



Summary : 

I am going to speak to you today about the subroutine 
DATAR and some of the history behind its conception. 

DATAR is a format- free input subroutine designed to read 
numerical input data with or without a decimal point. A 
blank space is used as the delimiter (separator) and as many 
pieces of data (or as few) may be punched on a data card as 
desired. The call statement is CALL DATAR (K,X) which initiates 
the reading of a data card and the beginning of the search 
for K pieces of data which will be returned as floating point 
(real) variables in the vector X. 

Background : 

We at General Foods have enjoyed the usage of " format-free" 
input capability as long ago as 1961 when the first Fortran 
compiler was made available for the IBM 1620. The only pro- 
blem with the input capability of that compiler was that each 
time the READ statement was encountered, a new data card was 
not read. That is, the reading of new data carried on in the 
input area of the compiler where the reading of old data left 
off. This caused problems when one had more data on a data 
card than one wanted to read. This problem was "solved" when 
the next compiler from IBM and all subsequent ones for the 
1620 (and the present compiler for the 1130) incorporated the 
format concept of input data that we are all familiar with. 
Other compilers for the 1620 (AFIT and PDQ-written by users) 
attempted to give format- free input capability, but each had 
its limitations. 

The few programs having the input capability we wanted 
were written in SPS (the assembler language for the 1620) 
and utilized a general purpose format- free input routine 
also written in SPS. 

There were many other capabilities lacking from the 
earlier compilers for small scientific computers such as 
the 1620 which drove others to write a group of input/output 
subroutines (also written in SPS) for use with commercial 
applications utilizing programs written in Fortran. These 
subroutines were called FORCOM, an acronym for Fortran 
Commercial. 
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At the Denver COMMON meeting in July, 1966 Jim Kokie of IBM 
was explaining the FORCOM subroutines written for the 1130 
(subsequently changed from a Type III program to a Type II 
one entitled "1130 Commercial Subroutine Package 11 ) . He made 
what appeared to be an astounding statement when he said, 
"The interesting aspect of seven of these eight subroutines 
is that they are written in Fortran!" Astounding, indeed, for 
he had just said in effect that with 1130 Fortran one now 
has assembler language maneuverability at a higher program- 
ming level. 

Method ; 

The method employed in DATAR and the other routines I 
have mentioned is a relative simple one. In 1130 Fortran 
(and also the 360 Fortrans) one has the capability of reading 
information from a data card in Al format from 1 to 80 columns. 
When, the variable used for reading is an integer variable, 
the resultant value after the read (under Al) is a numerical 
one which can be used for comparing and other purposes with 
no problems (Data read under an A2 format results in similar 
numerical- type values) . Table 1 attached shows the numerical 
equivalent values for all valid 1130 characters which have 
been read under an Al format. (This is p. 150 from the 1130 
Commercial Subroutine Package, Version 2, Program Reference 
Manual, H20-0241-2) . 



This means, of course, that one can easily identify any 
valid 1130 character which is to be read in on cards by storing 
the appropriate decimal equivalents in your program and comparing 
these stored values with the ones read-in under the Al format. 
If we wanted to recognize a slash (/) mark, for instance, one 
might put the statement K=24896 in his program, read the appro- 
priate variable in Al format, and compare the two. One can 
do many nice programming tricks this way. 

It is worthy to note in passing the relationship among 
the decimal equivalents of the ten digits. Each is 256 larger 
than the preceding one which allows for one to translate the 
decimal equivalent (K) of a digit read in Al format into its 
digit equivalent (I) with a single Fortran statement: 

I- (K+4032)/256 
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The letters can be related to the numbers 1-26 in a similar 
way, but one must program around the two discontinuities noted 
between the letters I- J and R-S. 

Remarks : 

DATAR was possible only because of the capability of reading 
characters on a data card in an Al format. The attached abstract, 
flow chart, and Fortran listing of the subroutine clearly shows 
what is taking place. However, a few remarks are in order concerning 
the philosophy of this format-free input subroutine. 

1. Everytime the call statement CALL DATAR (K,X) is en- 
countered in a program, a new data card will be read 
and scanning started in column 1. As many data cards 
as necessary will be read until the K pieces of data 
(separated by at least one blank column) have been 
encountered. All numbers with or without decimal 
points will be converted to floating point and re- 
turned in the vector X» 

2. Only numeric data can be read by DATAR. Any char- 
acter other than a decimal point (.), minus sign (-) , 
plus sign (+) , or the digits (0-9) will cause an 
error message to print on the printer. If an error 
is encountered, the routine will halt on a PAUSE and 
will return to the first statement in the subroutine 
after PROGRAM START is pushed. (Thus, one can fix 
the error and continue at the point of the calling 
statement) . 

Note: Both an 026 plus sign (12 punch) and an 029 plus 
sign (12-6-8) can be recognized. 

3. A decimal point alone, a minus or plus sign alone, 
or a minus or plus sign with a decimal point alone 
will result in the variable being set to zero. 

4. The subroutine at present scans columns 1-72 for data. 
If any other limit besides 72 is desired, a one state- 
ment change is all that is necessary. 
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)ther Applications: 

I have already mentioned the Commercial Subroutine Package 
>ut it is worth mentioning again, particularly Version 2 which 
:ontains some twenty-three subroutines most of which are 
written in Fortran. 

Clearly, one could use this method very effectively when 
ne wants to generate alphabetic information from within one's 
rogram. Of course, the "H" specification would also work 
nless the information is to be printed in variable places 
n the page (like the word "TOTAL*" as a heading of a column 
f figures whose placement on the page is variable depending 
pon problem size) . 

I have used this idea many times in many programs, some of 
hich are shown below: 

1. In a "scatterplot" program each X-Y value is plotted 
as an "A". If more than one data point falls within 
the same grid, it would show as a "B" etc. 

2. In another program I convert the digits 1-6 to the 
letters A-F which is quite easily done (could be 
done, of course, for all the letters) . 

3. The following table shows five separate row labels, 
any one of which could be encountered in a program. 
The index i is used to generate the proper row label. 



4. In another program (familiar to some of you) the row 
labels were generated from the i^ index according to 
the following correspondence. 



i 



Condition 



1 
2 
3 
4 
5 



A 
A B 
ABC 
A B C D 
A B C D E 



i 



Row Label 



1 
2 
3 
4 
5 
6 
7 



A 
B 

A B 
C 

A C 
B C 
ABC 
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5. In the same program as (4) other row labels were 
generated in this way: 



As before, the index _i generated the numbers in Al 
format so that blanks could be printed if the pro- 
blem size were smaller than three. 

6. In a one column distribution program one could separ- 
ately identify all digits, letters, and special char- 



In closing, I shall only say that the use of the Fortran 
language in this way is only limited by one's imagination. 



i 



Row Label 



1 
2 
3 
4 
5 
6 
7 
8 



111 
112 
12 1 
12 2 
2 11 
2 12 
2 2 1 
2 2 2 



acters. 



DSG/mh 




EBCDIC CHARACTERS AND DECIMAL EQUIVALENTS 



A 

B 

C 

D 

E 

F 

G 

H 

I 

J 

K 

L 

M 

N 

O 

P 

Q 
R 



-16064 
-15808 
-15552 
-15296 
-15040 
-14784 
-14528 
-14272 
-14016 
-11968 
-11712 
-11456 
-11200 
-10944 
-10688 
-10432 
-10176 
-9920 



S 

T 

U 

V 

W 

X 

Y 

Z 



1 

2 

3 

4 

5 

6 

7 

8 

9 



-7616 

-7360 

-7104 

-6848 

-6592 

-6336 

-6080 

-5824 

-4032 

-3776 

-3520 

-3264 

-3008 

-2752 

-2496 

-2240 

-1984 

-1728 



blank 

. (period) 



16448 
19264 



< (less than) 19520 

( 19776 

+ 20032 

& 20544 

$ 23360 

* 23616 
) 23872 
- (minus) 24640 
/ 24896 
, 27456 
% 27712 

* 31552 
@ 31808 

* (apostrophe) 32064 

32320 
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Subroutine DATAR 



Purpose ; 

To read data in "free" format from cards , each piece 
separated from each other by at least one blank column (be- 
tween cols 1-72) 



Usage ; 

Call DATAR (KTOT / A) 

Description of Parameters ; 

input KTOT - number of pieces of data to be read 
output A - the output vector containing the KTOT pieces 

of data 

Remarks : 

An error condition will result if any character other than 
the digits 0-9, a plus sign (+) , a minus sign (-) , or the decimal 
point (.) is encountered. 

The n end of card" specification is set at column 72. 

If another specification is wanted (say, column 80 for a complete 

card scan) ; change the first card of the subroutine (DATAR 13) 
accordingly (i.e., KK = 80). 

Subroutines Required: 

None 

Input - Output Devices Used; 

1442 Card Reader, 1132 Printer 
Method ; 

Each data card is read with the format 80 A 1. Each 
character is scanned and the proper numbers formed arithmetically. 



/ / D<J D 

*^-lftf hatap 

/ / r On 

* ONE WORD . I N T F G - R ^ 

SUP POUT IMP DAT AR ( KTOT * A ) 



c 



FRtt FORMAT INPUT ROUTINE 

KTOT-NUW8ER OF ELEMENTS TO BE READ AND PLACED IN *a* 
A=0!JTP!.JT VICTOR OF VA^IA.PLFS 

D T v I ON A ( 1 ) 
DT '^PN'S I ON N' (80) 

SET * E N D OF CARD* AT COLUMN 72 
K<=72 



1 -vr = 1 

103 R E A D ( 2 » 4 n ~) ( N ( I ) , I = 1 » KK ) 

40 FORMAT ( 8QA 1 ) 

T N I T I A L I Z p AND S^T-UP 

137 c;Tf-M=:l. 

NDEC=0 

CHECK FOR r ;L ANK 
105 I - ( N ( I ) -1 64^8 ) 132,101,132 

r H F C < p n c vn or r a p n (COL * !/ v * ) 

101 IF( I-KK) 704*10^, im 

104 1=1+1 

GO TO 105 

CHF.C^ FOP di_!js SIGN (12-6-8 CARD PUNCH-029) 

I~(M I )-?no3?) 138,7 33,1^8 

CHECK FOR PLUS MGN (12 CARD RJNCH-026) 

IF( N( I )-20544) ■3 02 *133,102 

CHECK FOR WIN! IS ^ I G M ( - ) 

T r ( M ( I ) ~ 2 4^,40 ) 1 8 , T^6 , 1 OR 
CTO\t = -i # 

CHECK FOR FNin nr CARD ( COL *<;<*>- 

IF( I-KK ) 1 07 , 1 28 *128 
1 = 1 + 1 



132 



138 



1 2 
1 06 



133 
107 
1^8 
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DAT AR 
DAT AR 
DATAR 
DAT AR 
DATAR 
DATAR 
DATAR 
DATAR 
DATAP 
DATAR 10 
DATAR 11 
DATAR 12 
DATAR 13 
DATA R ]4 
DATAR ]S 
DATAR 16 
DATAR 17 
DATAR 18 
DATAR 19 
DATAR 20 
DATAP 21 
DATAR 22 
DATAR 23 
DATAR 24 
DATAR 25 
DATAR 26 
DATAR 2 7 
DATAR 23 
DATAR 29 
DATAR 30 
D A T A q 3 i 
DATAR 32 

DATAR 34 

DATAR 35 

DATAR 36 

DAT A R 37 

DATAR 38 

DATAR 3 c < 

DATAR 40 

DATAR 41 

DATAR 42 

DATAR 43 

DATAR 44 

DATAR 45 

DA'! AR 46 

DATAP 47 

DATAR 4P 

D A TAR 40 

DATAR 50 

DATAR 51 

DATAR .5 2 

DATAR 53 

DATAP -4 

DATAR 5 5 

D A T A ^ n< 



c 
c 



r 

r 
C 



CHECK FOP DECIMAL POTNT(.) 

100 IF( N( I )-19264) 112*109,11^ 
109 NDFC=I 

CHECK FOR END OF CARD (COL *KK*) 

no tf( j-kk ) ui»nsn^ 

111 1=1+1 

CHECK FOR R L A M K 

112 I F ( N { I ) - ]. 6 4 4 8 ) 130*113,130 

ACCFPT nTPIT* n-9, P^J-CT ALL OT H r R CHARACTER c 

130 IF( N( I )+40^2 ) !31*122*n5 
13 5 I F ( N ( I ) + 1 7 2 8 ) 1 2 2* 122 ,131 

131 WRITE* 3* 140) N ( I ) * I 

140 FORMATt 1H1 * 2 1 hNON- NU V <ER I C CH AR AC T ER * 1 X , A 1 , 1 X , 9H I H COLUMN, 13) 
PAUSE 
GO TO 1 

HAS DECIMAL POINT RF^M FN C P -UN TP P Fn 

113 I F ( N D E C ) 116*114*116 

NO 

116. NOPC=I 

TO 117 
Y-S 

116 NFIN=I-2 

CH c c< Fn p (# ), (-), ( + ), (-.)* 09 p Y THF^^LVF^ 

117 T F ( N FIN- N S T R T ) 1 28»U P »1 16 

IF (.)* (-)* ( + )* (-.)♦ OR ( + •) SET A(K)=n. 

128 A(K)=0. 

GO T 12° 

118 L = N F I N - N ^ f r + 1 

L = N A SH J P T 

L GREATER THAN C H I FT L F FT 
L LESS THAN SHIFT RIGHT 

L L = I A B S ( L ) 
SHI FT = 10. **LL 

«K = NSTRT 

DO 162 JJJ=KKK»NFIM 
IF( N( JJJ)+4n?2) 161*162*161 
162 N S T R T = N S T P T + 1 
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DATAR 57 
D AT AR 58 
DATAR 59 
DATAR 60 
DATAR 61 
DATAR. 62 
r> A T A d 5 
DATAR 64 
DATAR 65 
DATAR 66 
DATAR 67 
DAT AP 6 8 
DATAR 69 
DATAR 70 
DA TAP 71 
DAT AP 72 
DATAR 73 
DATAR 74 
DATAR 75 
DATAR 76 
DAT AP 77 
DATAR 78 
DATAP 7^ 
DATAP 8- 
DATAP 81 
DATAR 82 
DATAR 33 
DATAR 84 
DATAR 8 5 
DATAP 86 
DATAP 87 
DATAP 88 
DATAP 8? 
DATAR 9H 
DATAR 91 
DATAR 92 
DATAP 9 3 
HATAP 94 
DATAP 9^ 
DATAP P 6 
DATA 9 °7 
DATAR 93 
DATAR 9v 
DAT AR100 
DATAP101 
HATAPlop 

f) a T A p 1 ^ ^ 
DATAP104 
DATAR 105 
DAT AR 1 06 
D A T A P 1 7 
DAT AR 108 
DAT AR 109 
DAT AR1 in 
DATAP 11 1 
HAT AP 1 1 2 
DATAP 113 
D AT AR 1 14 
DATAR115 
DATAR116 



r 
r 
r 



C 
r 



GO TO 128 

* GFT * ROUTINE - A(K) R r TURNFD AS FLOATING POINT V A P I A R L c 

161 F FF = • 

DO 160 JJJ = NSTRT*NFI.N 
160 F FF = FF'.F* 1 • +FLOAT ( ( N ( J J J ) +40 3 2 ) /256 ) 
IF(L) 15 0*152*151 

150 FFF=FFF*SHIFT 
GO to i 59 

151 crpF = CTFC/CHT FT 
1 5? A ( K ) =rFF c ^c T GfV 

CHECK FOR LAST VARIABLE 

129 IF(K-KTOT) 120 ..119*119 

120 <=K + 1 

CHECK FOR END OF CARD ( COL *KK*) 

IF( T-KK ) 1?1 ,103*103 

121 1=1+1 

GO TO 137 

HAS DECIMAL POINT B c rW ENCOUNTERED 

122 I F ( NDFC ) 1?4*]?^*]?4 

YES - SHIFT DECIMAL DIGITS ONE SPACE TO LEFT 

124 N ( 1-1 ) = N ( I ) 
GO TO 110 

MO - CHECK c O® FMO of CA^D (COL *KK#) 



123 Tcr ( i-K* ) 1?5*l^A,*ipf) 

125 1=1+1 

GO TO 100 

126 NFIM=I 
MOFC=T+l 
GO TO 117 

\\Q OCT WON 
/ / HMD 

* STORE W S IJA OA TAP 



DA TAP 117 
DATAR1 IS 
DAT a p 1 1 q 

DATAR121 
DATAR 122 
DATAR 123 
DATAR 124 
DATAR 12 5 
D A T A P 1 2 6 
0ATAR127 
OAT API 2 8 
DAT AP 1 29 
DATAR 130 
DAT AR 1 3 1 
DATAR 132 
DATAR133 
DAT AR 1 34 
DAT AR 135 
DATAR 1 36 
OATAR137 
DAT AR 1 38 
DATAR 139 
DATAR 140 
DATAR 141 
OAT AR 1 42 
DAT API 43 
DATA.R144 
DATAR 145 
QATAR 146 
DAT AR 147 
DAT AR 143 
DATA&149 
OATAP1SO 
n A T A O 1 * 1 

OAT API ^? 
DAT AP 153 
DA TAR 1 54 
DAT AR 1 55 
DATAR 156 
DATAR 157 
D A T A D 1 5 3 
HATAoi so 
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In the fall of 1965, the State of Tennessee entered upon a new adventure in the 
field of higher education, when Chattanooga State Technical Institute opened its 
doors for the first time. The purpose of this school was to provide, during a 
two-year period of study, a junior college education geared, not so much 
to the development of theories, as to the practical application of these theories, 

One of the fields of study included in its program is a data processing cur- 
riculum which is divided into three distinct areas. The first of these is, of 
course, the various programming courses. In the 14 courses in this category, 
the student is introduced to variety of subjects. From an introduction 
beginning with unit-record equipment and its applications, he progresses into 
machine- level language programming languages. From higher level languages such 
as COBOL, FORTRAN, AND PL/1, he then goes into Systems Design and Analysis. 

In keeping with our philosophy that the data processor needs to have a well- 
rounded educational backgroung, the student is also required to take a group 
of courses called related studies. Among these courses are English, Public 
Speaking, Mathematics, and Social Science. Additionally, the student chooses 
to complete his course of study with courses either in Accounting or in Math- 
ematics and Science. 



Our students' courses in computer programming initially included FORTRAN and 
1620 SPS during their first year. In order to expand their programming back- 
ground to include work with other systems, we planned to provide training and 
experience on the 1401 during their second year. Since we believe it is necessary 
for a student to compile and execute programs before he can begin really to 
understand a computer-programming system, we faced a very definite problem. How 
could we teach the 1401 when our school only has a 1620 computer? The ideal 
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solution was to rent a 1401 computer; therefore, we called up our "friendly 
IM representative" and asked the cost for renting an appropriately equipped 
system,, When we heard the price, we realized that our ideal solution would 
have to be compromised somewhat o Then one of our faculty members suggested 
that some public- spiritec company might be happy to allow us to use their 
1401 system free of charge or at a reasonable costo But when we realized the 
amount of machine time and/or cost involved, this idea also faded into the 
backgroundc And so, you guessed it, I was appointed the task of making our 
1620 meet this new challenge. 

Up until this point, I had always believed that the 1620 users-group library 
was a worthwhile undertaking. Now it had a chance to prove itselfo At the 
first of September a year ago I ordered a group of programs known as the 141 
Educational Computer System* It included two 1620 programs—a simulator and 
an SPS assembler*. 



The simulator portion of the 141 System provided for the simulated execution 
of 14 1401- type instructions Among these were the basic input-output 
instructions — read, write, and punch— the arithmetic instructions of addition and 
subtraction, the data manipulation instructions of move and load, the various 
forms of the branch instruction and some few miscellaneous instructions*, The 
indicators that can be tested are those that result from a compare operation; 
high, low, equal, and unequalo The only provisions made for carriage control 
on the printer was the testing for channel 12 and skipping to channel 1, this 
function being automatically performed by the simulator, rather than being con- 
trollable by the program. Also provided were subroutines for multiplication, 
division, zero suppression, and editing of fields in the form of a dollar and 
cents amount o 
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We used this system through the entire fall quarter and were very pleasantly 
surprised with the results obtained However, it had several dificiencies that 
we wanted to overcome, so in December of last year I proposed to begin work on 
a project that led to the development of the 1041 simulator*. 

One of the first problems encountered in the 141 System concerned the amount of 
core storage available* Of the thousand positions available the first three 
hundred were reserved for use as input-output areas In addition, the four 
subroutines mentioned above required approximately one hundred positions 
apiece; therefore the average student problem was limited to less than five 
hundred positions, which meant that the complexity and size of the various 
problems ahd to be limited. As a result, the first change was to increase the 
amount of core to two thousand positions This change provided greater variety 
in the programs that could be solved by the students It also afforded the 
student experience in using a three position address to denote an address 
greater than 999 

A second need was for the student to be exposed to the power of the 140 1* This 
need necessitated making available for his use the complete instruction set for 
a 1401 card system rather than simply the 14 instructions then available. In- 
cluded in this group of additional instructions were some to provide greater 
ease in handling problems which were commercial in nature For example the move 
characters and edit instruction, probably the most powerful instruction on a 
1401, was implemented in full power • Now the user could specify the format in 
which he wanted information displayed* In the edit-word he could denote the 
location of the decimal point, any commas, the desire to have leading zeros 
suppressed or asterisks inserted in their place (a feature known as check 
protection), the insertion of a dollar sign, and the use of a CR symbol to denote 




a negative value. The zero-suppression routine, likewise, was replaced by 
a single instruction*, The other instructions added were zero and add, zero 
and subtract, the multiple-output instructions, and store A and B 
address registers to facilitate subroutine linkages 

In order to allow printer operations, a control-carriage instruction was 
includedo Finally, for compatability with the 1401, the select stacker 
instruction was included. Simulation of this instruction is of course 
physically impossible with a 1620, therefore it is treated as a no-op instr- 
uction unless there is an address included with it, in which case the 
appropriate branch is taken. 

We expanded the usefulness of the Branch on Indicator by allowing it to check 
for the Last Card, Channel 9, and Channel 12 situations*. 

In order to teach the 1401 indirect addressing scheme, it was necessary to 
implement the feature known as index registers. By storing appropriate 
values in the index registers, effective addresses could be generated without 
modification of the actual addresses in core c The results are faster execution 
and more efficient use of storage c An additional feature of the 1401 allows 
for the CPU to utilize the contents of the A or B address registers, rather than 
obtaining new addresses from core c This feature, like the index registers, 
results in better use of core and faster program execution. 

As a test for this new simulator, one of the programs chosen was the Autocoder 
Pre-List program*, It worked, and so did some 500 student problems run against 
the system 




The final goal— that of increased Through-put --was achieved in many ways, some 
of which we have already pointed out* In addition to these, I completely 
rewrote twelve of the fourteen instruction simulation routines e For instance, 
new algorithms had to be developed for addition and subtraction since the high- 
order position of the fields did not necessarily have to be numeric „ We also 
used, wherever possible, the indirect addressing feature of the 1620 The net 
result is considerably greater Through-put over the 141 simulator This 
was especially gratifying when you remember that, in addition to simulating the 
1401 instruction, we were also maintaining the current status of the A and B 
registerso 

In addition to the ability to execute programs, both simulators have four 
routines providing the following features: 

1) A formatted dump of the 1401 Storage area 

2) The ability to alter the contents of the 1401 storage area 

3) The ability to designate at execution time the address from which 
execution is to commence 

4) The ability to initialize the 1401 storage area to blanks The 
formatted core dump includes displaying the contents of the various 
registers and the op-code that was last being executed 

All of these functions are under the control of the operator and are initiated 
through the use of the 1620 console typewriter. 

As all of you are very much aware, the development of a computer is composed of 
two phases The first of these, which we have discussed up to this point, is the 
development of the hardware, but, in order to utilize effectively the elements 
of the hardware, it is necessary to develop appropriate software « Now let ! s 
look at what we have provided in the way of software* 



As you remember, there was provided in the original 141 system an SPS Assembler* 
It of course provided mnemonic op-codes corresponding to the 14 instructions 
of the 141 simulator plus the pseudo-op-codes necessary in a symbolic 
language o The highest address it could assemble was 999. It made no provision 
for index register specification. One of the interesting features of it was 
that it allowed one-pass assembly only for programs containing fewer than 100 
source cards o Finally the label table had a capacity of ninety entries • 

Next we see a 141 Autocoder assembler that was developed by two of my second- 
year students o Though written independently of the 141 SPS Assembler, their 
program provided many similar features <, 

Several minor and two major modifications allowed the 141 assembler to be 
expanded into the 1041 SPS Assembler., One major change allowed the address 
generation algorithm to specify four-position addresses in three positions 
and to include any index register associated with that address o A second 
major change made better use of the available 1620 core storage in order to 
process much larger programs in onB pass--250 to 300 in 20K or up to 700 to 
900 on a 40K machine. This was accomplished by storing only the amount of 
information necessary to produce the source card image on output • The writers 
of the 141 assembler stored columns one through 55 o I had discovered after 
analyzing many source decks that storing ten to fifteen columns was more than 
adequate • At long last the 1620 user has for his use, for all practical 
purposes, a 1401 computer system, 

I hope many of you are asking yourselves what is necessary for you to use 

this system,, Needed is a 1620 with indirect addressing and with the additional 



instruction set* These two features could be eliminated at the cost of slower 
execution,, I will be glad to talk with any of you about other modifications 
that you might desire • We plan to submit the 1041 system shortly to the 1620 
Users 1 Group Library 9 



Alas, as I began to breathe a sigh of relief, we recieved conformation that 
our school's new 360 System is in the process of being installed today. In 
anticipation of this installation several weeks ago, the question was asked as 
to when I plan to have a 1401 simulator available for our 360 I categorically 
denied even the idea of such a project, but I must confess to you that the 
idea of having a 4K simulator with actual stacker select capability has me 
already mentally drawing the flow charts Q 



INSTRUCTIONS 



1401 



141 



1041 



BRANCH ON INDICATOR 
CHANNEL 9 
12 

LAST CARD 
UNEQUAL 
EQUAL 
LOW 
HIGH 
BRANCH WORD MARK 
OR ZONE 

COMPARE 

NO OPERATION 

READ 

WRITE 

WRITE & READ 
PUNCH 

READ & PUNCH 
WRITE & PUNCH 
WRITE & READ & PUNCH 
SELECT STACKER 
CONTROL CARRIAGE 

STORAGE 

CHAIN OF ADDRESSES 
INDEX REGISTERS 

LEGEND; X=STANDARD 

0=OPTIONAL 
S=SUBROUTINE 



X X 

X X 
X X 
XXX 
XXX 
X X 

X X 

X X 
XXX 
XXX 
XXX 
XXX 
X x 
XXX 
X x 
X x 
X X 
X X* 
X X 

1000 2000 

X X 
x 



Attachment Number 1 



SUMMARY OF FEATURES 



INSTRUCTIONS 1401 



ADD X 

SUBTRACT X 

MULTIPLY O/S 

DIVIDE O/S 

ZERO & ADD X 

ZERO & SUBTRACT X 
MOVE CHARACTER TO 

A OR B WORD MARK X 

MOVE CHARACTER TO + 

MOVE AND SUPPRESS ZEROS X 

MOVE NUMERIC X 

MOVE ZONE X 

MOVE CHARACTER & EDIT X 
LOAD TO A-FIELD 

WORD MARK X 

SET WORD MARK X 

CLEAR WORD MARK X 

CLEAR STORAGE X 

STORE A-ADDRESS REGISTER 

STORE B-ADDRESS REGISTER 

BRANCH X 
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SPEAKERS 

DAVE DYE (PID) 
JOHN KEITH 

JIM STANSBURY , CHAIRMAN 
GAYE BABER 

DISCUSSION 

MR. DYE DESCRIBED THE OPERATION OF PID, POINTING OUT THE 
PROCEDURE FOR HANDLING ORDERS AND TELLING HOW THE USER CAM HELP 
IMPROVE THE SERVICES. JOHN KEITH DISCUSSED THE SHIPMENT ANALYSIS 
QUESTIONNAIRE, PURPOSE AND USE OF THE QUESTIONNAIRE, AMD A SAMPLE 
COPY IS INCLUDED IN THE REFERENCE MANUAL. JIM STANSBURY DISCUSSED 
THE STANDARDS FOR THE 1130/1800/360 CONTRIBUTED PROGRAM LIBRARY. 
THESE STANDARDS WILL BE ISSUED ON THE FIRST UPDATE OF THE REFERENCE 
MANUAL. 



Cincinnati - COMMON 



Sponsor : 

Administrative Division, Program Library Project 
Subject: 

IBM Program Information Department — Program Library Procedures 

Speaker : 

D. R. Dye 

Company Represented: 
IBM 

Speaker's Address: 

IBM Corporation 

Program Information Department 
40 Saw Mill River Road 
Hawthorne, New York 10532 

914 — 592-5790 

Number of Pages: 
4 
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A presentation concerning the IBM Program Information Department 
(PID) was made at Cincinnati COMMON. Slides were used in conjunction 
with the verbal presentation which was educational in nature. An open 
discussion period was included. 

Although the presentation was formatted somewhat differently than the 
following narrative , it answered these same questions about PID that 
you (as a user) might ask. 



WHAT IS THE IBM PROGRAM INFORMATION DEPARTMENT (PID) ? 

PID is the central control point for availability and distribution of IBM 
Programming Systems, IBM Application Programs and Contributed 
Programs, PID serves IBM customers in the United States from an 
extensive facility in Hawthorne, New York, Customers of the IBM 
World Trade Corporation are serviced from similar facilities in Paris, 
Rio de Janeiro, Toronto, Tokyo and Sydney, 

PID's growth from its inception in the late 1950 f s has been dramatic. 
From an elementary exchange service for a few customer and IBM 
authored programs, PID has become a carefully organized operation 
which distributes hundreds of thousands of programs to users each 
year. 



WHAT DOES PID MEAN TO ME AS A USER? 

The availability of almost 3000 programs for IBM equipment means 
that users can often save considerable programming, procedural 
and systems design effort that would be required if they started from 
scratch. Often the economic payoff on an installation can be improved 
and the effective utilization can be increased and/or realized sooner. 

PID can take a load off your back by serving as the distribution agency 
for your programs through the Contributed Program Library. 

PID also means that, as an IBM customer, you have a dependable, 
accurate and timely source of IBM authored programs to support your 
system installation. When an improvement is incorporated or a bug 
is fixed, in an IBM program, users registered with PID automatically 
receive the modification or a notice of availability of the release. 



HOW DO I KNOW WHAT PROGRAMS ARE AVAILABLE FROM PIP? 



Abstracts of all programs available from PID are published in the 
"IBM Catalogs of Programs' 1 . Copies are available through your 
local IBM office. In addition, IBM sales and systems engineering 
representatives receive automatically, timely fact sheets called 
Programming Announcements (P- Letters) which give information 
on the availability and features of IBM Programming Systems and 
IBM Application Programs. In addition, a Memo to Users is sent 
to each customer on the PID file announcing the availability of a new 
release. 

Once you have ordered an IBM program and registered with PID as 
a user, you will automatically receive direct announcements of new 
releases of that program. 



HOW DO I ORDER : A PROGRAM FROM PID ? 

Normal program orders should be submitted using Program Order 
forms available from local IBM offices or special prepunched order 
cards supplied to you by PID. By a normal order we mean one that 
will be processed under PID r s standard in-house processing cycle of 
up to ten working days. Transit time to and from PID is in addition 
to the ten working days in-house. 

Orders that require faster handling should be submitted through your 
IBM representative after he has contacted PID by phone to make 
arrangements for special handling. 

It is a good practice to consult your IBM representative before sub- 
mitting an order. Certain information must be provided on the form 
and sometimes magnetic volumes must be submitted with the order 
form. Without all needed information and magnetic volumes, PID 
cannot complete the processing of your order. The IBM representative 
can help you in determining if the order submittal requirements have 
been met. 



HOW IS THE QUALITY OF PID. DISTRIBUTIONS ASSURED ? 

Extensive use is made of special hardware designed and built for PID. 
Also, sampling, chain copying, programmed comparisons and assigned 
personal accountability techniques are used. 
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The result is that the quality level of program materials distributed 
by PID is very high. 

One particularly interesting piece of special purpose gear used for 
this quality control is the IBM 7299 Tape Copy and Compare System. 
This system automatically performs a bit for bit compare, in core, 
of written output against input and checks record counts and control 
labels. This assures the readability and completeness of users' 
magnetic tapes onto which programs have been copied. 

If you receive a magnetic tape bearing an external label stating that 
the tape was "verified readable at PID" but you experience difficulty 
with it as input on your own system, we suggest that you try to read 
it on another drive and even another system, if possible. If a pro- 
blem is still encountered, your CE should be notified so that he may 
determine the precise nature of the reading problem. 



WHAT CAN I DO TO USE PID MORE EFFECTIVELY? 

A few simple checks when submitting an order will insure that you get 
the program you need when you need it. 

1. Be sure that the order form is complete. These items are needed 
by PID to control the accuracy of the order process: 

a. IBM customer number and branch office number (your local IBM 
representative will fill in this information for you if requested). 

b. Type of material required. 

c. Track mode and recording density. 

d. Full return address including ZIP code and ''Attention of". 

2. Be sure to submit a magnetic volume to PID if it is required for the 
program being ordered. The program abstract in the "IBM Catalogs 
of Programs' 1 always indicates if a volume must be submitted. All 
magnetic volumes should carry external labels identifying the sender 
and the program being ordered. 

3. Send the order form and the magnetic volume to PID as one package. 
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Plan ahead — allow adequate time for shipping to PID, up to ten work- 
days at PID for processing and up to four days for return shipment. If 
faster service is needed, have your local IBM systems engineer or sales 
representative call PID. 

Report packaging and distribution problems to your local IBM represen- 
tative immediately if a replacement is needed. The Program Distribution 
Questionnaire, included with every shipment from PID, is a convenient 
means of reporting on the condition of program materials. Please use it. 
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SESSION NUMBER F.2.7 



SPEAKERS 

NONE - GENERAL DISCUSSION 



DI SCUSSION 

C.O.S. - COMPATIBILITY OPERATING SYSTEM. 
SOME 20 PERSON PARTICIPATED IN A GENERAL DISCUSSION OF C.O.S. 
VARIOUS LEVELS OF C.O.S. EXPERIENCE LED TO A GOOD DISCUSSION. 
LENGTH OF THE MEETING WAS ABOUT 1 HOUR 10 MINUTES. 
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SESSION NUMBER F.3.1 
SPE AKER S 

JAMF$'M. FISHER, THE BADGER CO., INC. ON STORAGE 6 RETRIEVAL 
PFRMANFT FILES FOR THE 1620/1311 MONITOR SYSTEM 



Storage & Retrieval of Permanent Files 



for the 1620/1311 Monitor System 



by 

James N. Fisher 

The Badger Co., Inc. 
Cambridge, Mass. 
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A method of permanently loading of information (either in the form 
of numeric data or Hollerith-type Format headings) has been found which 
fills a gap inherent in the IBM 1620/1311 Monitor System. This method 
consists of three steps in which: (1) a Fortran program is written to 
read the data and temporarily store it in Working Storage (this is done 
through the usage of the RECORD statement), (2) a set of three cards 
designed to write a 100-digit indentification tag preceding the data files 
is then read into the computer, and finally (3) a *DL<^AD operation is 
performed which is used to relocate the information from Working Storage 
into a permanent disk storage address. 

The data may be used at any time by copying it into Working Storage 
and then calling for it whenever necessary. This is accomplished in two 
steps: (1) a *DC0PY operation used to copy the permanent data files into 
a working storage area and (2) a FETCH statement used to call in the data 
by a main program. 

The program is set up for a Monitor system with Working Storage 
beginning at 00219. If the Working Storage area has been redefined this 
value must be altered accordingly. 



STORING DATA FILES ON DISK 



Loading Information into Working Storage 



A Fortran program is written by the programmer to read the 



desired information into the Working Storage Area. A program 




THE BADGER COMPANY, Inc. 



-2- 

to read in an alphameric set of headings is shown as follows: 
44J0B 5 

DEFINE DISK ( ni , n 3 ) 
DIMENSION YH (n 1( n 2 ) 
D?> 2 N=l, n 4 
2 YH (N) = 0.0 

READ 1001, Nl, N2 

READ 1002, (( YH (J,K), J = l, Nl), K=l, N2) 
N=2 

RECORD (N) ((YH(J.K), J=l, Nl), K=l, N2) 

1001 FORMAT (214) 

1002 FORMAT (njA4) 
END 

4444 

Where: n^ = number of individual items to be written per data record=Nl 
ri2 - number of data records to be stored = N2 
n 3 — n 2 + 1 
n 4l n l * n 2 

This program, since it is to be used for alphameric headings, uses 
an A- Format in Statement number 1002 to read in data. For nu- 
meric information the programmer can use either E-, F-, or I- 
Format instead. Note that in the third instruction after Statement 2, 
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N is set equal to 2. This is done in order to leave the first sector 
of working storage available for the 100 -digit identification tag of 
Section II. 

Also: The maximum number of sectors/data record = 2. This is 
determined by the value of f and k (See Service Manual, File 
No. 1620-36, Form C26-5739-3). 

II. Writing Identification Tag 

Next, the following three cards are loaded into the computer, with 
the Working Storage area defined as beginning at 00219 in Card 1. 
Cd. 1. 3600100005003600180005003400050007013800050007024816021900100100 
Cd. 2. 987897 10001 001 01 001200008046010659998 
Cd. 3. Blank Card 

Note: Some of the inputs in Cd. 2 are not necessary. However, it 
is strongly suggested that they be used exactly as presented 
in this paper. 

III. Permanently Loading of Data 

Finally, the data is loaded into a designated disk address. This is 
accomplished by means of the following set of cards: 
?WB 5 

^DUP Col. 21 Col. 49 

#DL0AD name » 1 002.191ngngngngngl n^n^n^n^n^ DI 
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Where name = name assigned to the data file by the programmer (6 
characters or less). 
n 5 = 00219 + n ? - 1 

n^ = available sector address - able to contain ny data records. This 

may be determined from a DIP* Listing of the Monitor System. 
n 7 = ^2 ^ there is one sector/data record; otherwise use 2(N2> for 

two sectors/data record. See note for Section I. 
Note: Both n^ and n^ are five-digit numbers which must be right- 
justified. 

UTILIZING DATA FILES 

L Copying Data Into Working Storage 

When the data files are desired, they must first be made available to 
a program by copying them into Working Storage. Copying of infor- 
mation from a permanent disk address into Working Storage is accom- 
plished in the following manner: 
£j*J0B 5 Col 21 

^DUP j 

#DC0PY name Mn^n^n^n^n^ lngngngngng 10021 9 

Where name = same as that in previous section. 

* a DIP Listing consists of a map of all programs, their corresponding 
disk locations, plus all available sector locations. This may be 
obtained through the USER f S Group. The IBM Program Library 



^7° THE BADGER COMPANY, Inc. 



-5- 

Number is 1*6- 141* 

ng = + 117 - 1 and must also be a five -digit right-justified number. 
Note: It is strongly suggested that the programmer carefully 
check the #DC0PY and #DL^AD cards. Errors in these 
cards have been known to render all disk-loaded programs 
completely useless * 
II. Operations with Data File 

The program reads in the data files by means of the FETCH state- 
ment. The record number is set equal to 2, as was indicated in 
Step I of the Storing Data Files on Disk Section. For a detailed ex- 
planation as to the proper usage of the FETCH and RECORD state- 
ments, see page 106 of the IBM 1620 Monitor II System Reference 
Manual - File No. 1620-36, Form C26-5739-3. In order to fetch and 
utilize this stored information, the program must contain a DEFINE 
DISK statement, in which the value of n^ must remain unchanged, 
while all n^ and n^ terms may now be less than or equal to those 
corresponding to Step I of the first section. 

A sample segment of a program used to fetch the alphanumeric in- 
formation of Step I, Section I and complement it with computed values 
is presented below: 
N = 2 

FETCH (N) ((YH (J,K), J = l, Nl), K=l, N2) 
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PUNCH 1003, <(YH (J,K), J=l, Nl), {Zfi (N, K), N=l, 3), K=l, N2) 
1003 FORMAT (n x A4, F10. 0, 2F13.4) 

Where: Zp (N, K) = the computed values used for output by the program. 

The following output was obtained from such a sample segment: 



DIAMETER, 


FEET 


1. 0000 


2. 0000 


3. 0000 


TRAY RING, 


INCHES 


4. 0000 


5. 0000 


6. 0000 


DOWNCOMER WIDTH, 


INCHES 


7. 0000 


8. 0000 


9. 0000 


PATH LENGTH, 


INCHES 


10. 0000 


11. 0000 


12. 0000 


DC-TRAY CLEARANCE, 


INCHES 


13. 0000 


14. 0000 


15. 0000 


INLET WEIR HEIGHT, 


INCHES 


16. 0000 


17. 0000 


18. 0000 


OUTLET WEIR HEIGHT, 


INCHES 


19. 0000 


20. 0000 


21. 0000 


HOLE DIAMETER, 


INCHES 


22. 0000 


23. 0000 


24. 0000 


HOLE PITCH, TRIANGULAR, 


INCHES 


25. 0000 


26. 0000 


27. 0000 



At the moment, permanently-loaded information may only be used by 
a disk-loaded program. This may be improved upon in the future. 



The advantage of permanently storing data files on the disk is that a 
programmer now may be able to limit the number of FORMAT state- 
ments appearing in his program. Further, independent programs 
may now be allowed to use the same records in places, thus further 
reducing the amount of storage required for some programs. Finally, 
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long chains of alphameric headings complemented by output data 
may now be permanently stored as data files. Caution, however, 
should be used in experimenting with the Storage -System, for as 
mentioned in Step I, Section II, some errors may result in the 
destruction of disk-loaded programs. 



A 
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SESSION NUMBER F.3.4 



SPEAKERS 

NO SCHEDULED SPEAKERS. 

DISCUSSION 

PLANS WERE MADE FOR THE 360 AGENDA AT THE SAN FRANC I SCO MEETING. 
THE GOOD AND BAD RESULTS OF THE SESSIONS AT THIS MEETING WERE 
EVALUATED t AND WE DECIDED WHAT PLANNED PRESENTATIONS WERE DESIRED 
AT THE NEXT MEETING. 
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SPEAKER S 



GPHPHF J. REYNOLDS, CFNFRAL MOTORS INSTITUTE ON COMPUTER 
TIME STUDY ANALYSIS FOR WORK MF A S UP E f v * E NT 



COMPUTER TIME STUDY ANALYSIS FOR WORK MEASUREMENT 



George J. Reynolds 
Assistant Professor of Industrial Engineering 
General Motors Institute 
Flint, Michigan 



ABSTRACT 



This article describes the format for the observation, 
recording and calculations of work standards. In 
addition, a computer program for the IBM 1620 Model II 
40K is included which provides a more efficient cal- 
culation time for each time study. This in turn 
reduces cost per work standard. 
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COMPUTER TIME STUDY ANALYSIS FOR WORK MEASUREMENT 

George J, Reynolds 
Ronald W. Cox 

The determination of a fair day's work has progressed from hap- 
hazard methods to rather scientific methods. One scientific approach to 
this is called "Time Study." Time study can be explained as a technique 
for the measurement of the time factor in the utilization of men, materials, 
tools, and equipment. In most industrial organizations, time study is one 
of the common techniques used for setting standards which are used as a 
basis for determining a fair day's work. In many organizations, the 
department doing time study work is called Industrial Engineering. 

Taking a time study consists of breaking down the operation into 
parts and recording the time taken for each of these parts by means of a 
stop watch. It also consists of recording job data, and setting the 
standard for the job. This standard is expressed in time per unit and 
is considered representative of a fair day's work. A time study primarily 
records the cycle time of the operation. 

In properly recording a time study there are certain data which 
must be clearly set down so that anyone referring to the study at a later 
date may know all the facts surrounding it. Some such items are obvious 
in their purposes - as for example, the part name. Others are more in the 
nature of manufacturing data. 

The following is a list of those items which are most frequently 
found on time studies: 

Date of Study . This establishes the day, month and year in which 
the study was made. Under certain conditions it might be necessary to 
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indicate the hour or the shift. 

Effective Date . This establishes the day, month and year on which 
the study became effective. It is highly important that this date tie 
into the routing date. 

Material . This item should adequately describe the material used. 
The kind, the specification number, the dimensions and any other facts 
required for identification must be set down. This is quite important 
since the study is limited to the specified material, and any change in 
the material may automatically call for a new study. 

Part Name . Carry here the full part name as it is carried on the 
blueprint. 

Part Number . Accurately record the part number as it appears on 
the print. 

Operator Number and Name . Aside from identifying the man upon 
whom the study was made the very act of learning the workman's name - 
if done in a tactful and friendly way - can help the time study analyst 
in selling himself as well as letting him know the man. This is impor- 
tant in establishing a better attitude toward the study on the part of 
the operator. 

Department Number . To show where the study was made. 

Machine Number and Name . This item should indicate by name, model, 
and inventory number the specific machine studied to identify it since 
no two machines, even though they be of the same make and model, perform 
identically. 

Cutting Compound . Show the kinds of cutting compound used such as 
oil, soap, etc., and wherever available refer to the specification 
number. The compound frequently has a very direct effect upon the 
cutting time and the correct recording of this item is an essential. 
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Operation Number and Name . A code to identify the operation and to 
t"^ it up with the routing. 

Speeds and Feeds . A machine time study that does no; ^arry complete 
and accurate speed and feed data has little or no value since it is such 
data that tells us how effectively the machine was performing during the 
study • 

Tools and Tool Number . Here identify whatever die, tool or fixtures 
are used in the study by number. Where necessary a brief description may 
be used as for example: Carboloy tips, special diamond dresser, abrasive 
wheel specification, etc. Like material data, speeds and feeds, and 
cutting compound, this identification of tools and tool number definitely 
limits and clarifies the study and a careful and accurate recording is 
important since any change would qualify the operation for a recheck. 

Production Per Hour . When you have completed the study through the 
development of the standard, calculate the number of pieces by dividing 
1.0 hour by the standard time per unit. 

Male or Female . Indicate here the sex of the operator. This in- 
formation may be called for in labor discussions relative to whether a 
job is correctly classified as male or female. 

Allowances . This space provides for entering certain allowances 
for items not covered in the elemental detail of the study. 

Total Time of the Study . Here is recorded ti.z starting and stopping 
time of the study, or the total overall time of the study. This data 
may be used as a check against the accuracy of the study. 

Name of the Observer . The time study analyst's name should be 
signed here. 
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Reason for Study . This space is set aside for such general remarks 
as the time study analyst may wish to make, for example, "Rechecked 
Standard." 

Approvals . Here is recorded the foreman's signature and all the 
necessary approvals required by management. 

Work Place . A sketch to work place, piece part showing operation 
or area worked on, etc. 

The more completely and accurately we record on our studies all 
the data relative to the job, the more valuable our studies become, both 
to us and to those functional areas which will call on us every day for 
information. As time passes, we very quickly forget the details surround- 
ing the taking of a study and when it becomes necessary to discuss it, a 
month or year or two years later, we very often cannot recall the whole 
picture to mind. Therefore, it is for this reason that the true value of 
full and correct job data is necessary. 

The actual mechanics of determining the standard time are not 
complex, but must be thoroughly understood and correctly done in order 
to arrive at a basis for getting an accurate work standard. The generally 
accepted method is: 

1. Obtain time data from observation by gathering stop watch 
readings, element frequency, foreign elements s performance, 
and allowances. 

2. Calculate leveled average time for each element. 

3. Determine allowed time per piece. 

4. Calculate standard time. 
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After completing the recording of stop watch readings, earmarking 
irregular elemental times, and recording elemental frequencies, then 
individual representative time values must be determined for each element. 
These times for each element come from the recorded snapback or continuous 
stop watch readings. This procedure can be explained by means of a sample 
continuous recorded study (Figure 1, page 11). The first recorded time 
from the starting of the watch until the end of the first element is .07 
minutes; so this figure would be recorded opposite (I) in element #1. 
Then the time for element #2 can be obtained by subtracting the continuous 
reading of element #1 from that of element #2. Thus, .38 - .07 = .31 and 
this figure is recorded opposite (I) in element #2 and so on, until all 
times are obtained. These times, then, will reflect the standardized 
method and conditions under which the operation is to be performed and 
should be averaged in order to determine the leveled average time for each 
element. 

This leveled average should be calculated by dividing the total 
of all time intervals, which are not earmarked, by the number of such 
intervals. For example, the completed study of the first element in 
Figure 1, page 11, covers a total number of 10 observations for the 
cycles. With one of these recorded times earmarked, the leveled average 
time should be determined by dividing by 9 the total time consumed by 
the remaining 9 time intervals. In this manner, the time for this regular 
element will reflect the basic established method for the operator in the 
performance of this particular part of the operation. 

Earmarked irregularities are called foreign elements. Where 
the irregularity is timed and recorded with a regular element reading, 
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the foreign element can be calculated by subtracting the leveled average 
time from the recorded watch reading. 

After this time value has been calculated, the prorating can 
be done the same as if the irregularity had been timed and recorded 
separately. These calculations with respective frequencies should be 
plainly shown in the provided space on the time study form. In addition 
to foreign elements, the details of delays for allowances should be 
filled in. These will tend to vary depending on company policy. 

If company policy involves performance rating, the next step 
is to determine the operator performance by comparing the operator to 
the average normal operator concept. The objective of this rating is 
to establish an allowed time which is representative of the average 
normal worker. This rating should be expressed as a percentage above 
or below 100% which represents the average normal operator. 

Next is to determine the allowed time per piece for each element 
of the study. This is done by multiplying the leveled average time by 
the performance and the elemental frequency for each element. 

Finally, this method of calculation involves the summation of 
all allowed times and all detail of delay allowances. After this is 
completed, subtract the total time for allowances on a per shift basis 
from the total shift time to determine the minutes available for work. 
Next, the minutes available for work time is divided by the summation of 
the allowed times plus delays on a per piece basis. This yields standard 
pieces per shift. Divide this number by eight hours which gives standard 
pieces per hour. Divide the standard pieces per hour into one hour and 
the final work standard is expressed in hours per piece. 
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All of the calculations for leveled average time, allowed time 
per piece, foreign elements, detail of delays and the setting of the 
final work standard can be accomplished by tne IBM 1620 Model II, 40k 
computer. In >rder for the computer to accomplish this, the time study 
analyst must prepare his studies In a language the computer understands. 
Therefore, it Is required that all data be in decimals whereby the key 
punch operator can take this data directly from the time study observati 
sheet (Figure i). The IBM cards should be prepared in the following 
manner: 



FIRST READ STATEMENT (.5F7.0) 



a. 


Part Number 


b. 


Operation Number 


c. 


Type of Study Code 




11 = "A" Continuous 




12 = "A" Snap Back 




13 = "B" Continuous 




14 = "B" Snap Back 




15 = "C" Continuous 




15 = "C" Snap Back 


d. 


Number of elements in the study. 



e. Number of columns of element readings. 

SECOND READ STATEMENT (10F8.2) 
Recording of Element Reading 

a. Keypunch individual stop watch time values in vertical 
order regardless of the type of study. 

b. For any missing time values or those disregarded because 
of some assignable cause code as "zero." 
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c. In the case of a continuous type of study where a value 
has been coded as "zero" add 1000 to next acceptable 
reading, 

d. If any of the readings are earmarked as a foreign element 

code as follows: 

Type "A" add 900 to the value 
H « B ., i. 800 «. ., ., 

it ii q it it 7QQ 11 11 11 

" "D" " 600 " " " 
ii it £H ii 500 11 11 11 

Note: Add zero if necessary for a total of five items. 



THIRD READ STATEMENT (10F8.2) 

Element Performance Evaluation and Element Frequency 
The performance and element frequency must be key punched 
consecutively for each element respectively. 



FOURTH READ STATEMENT (15F5.2) 

a. Foreign element frequency 

b. Detail of delay allowance 

1, Minutes/shift items 

2. Minutes/piece items 

The frequency and detail of delay allowance items are key punched consecu- 
tively, i.e., frequency, minutes/shift item, minutes/piece item as Line 1 
horizontally, etc. If any categories do not have five items in the 
particular study, key punch zero as the missing items until a total of 
five items each have been listed. 
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FIFTH READ STATEMENT (7A4) 

a. Name card. 

b. Continuous run - If more than one time study Is run 
at the same time, a 1 Is key punched in column 30 to 
separate the studies. 

For example, with the data from the time study shown in Figure 1, page 11 
as Input to the IBM 1620, the computer would give the following output 
for all the necessary calculations involved in stop watch time study 
analysis. 



TIME STUDY OBSERVATION OUTPUT 



NAME RON COX 

PART NUMBER 88128 

OPER NUMBER 12352. 

TYPE OF STUDY 11. 



LEVELED AVERAGE 

MINIMUM PIECE ALLOWED TIME 



LEVELED AVERAGE 

MINIMUM PIECE ALLOWED TIME 



LEVELED AVERAGE 

MINIMUM PIECE ALLOWED TIME 



LEVELED AVERAGE 

MINIMUM PIECE ALLOWED TIME 



LEVELED AVERAGE 

MINIMUM PIECE ALLOWED TIME 



LEVELED AVERAGE 

MINIMUM PIECE ALLOWED TIME 



LEVELED AVERAGE 

MINIMUM PIECE ALLOWED TIME 



LEVELED AVERAGE 

MINIMUM PIECE ALLOWED TIME 



A = .0106 

B = .0258 

C = .0282 

D = 0.0000 

ALLOWED CYCLE TIME/PIECE 

ATTAINABLE HOURLY PRODUCTION 

TOTAL DELAY (MIN/SHIFT) 

TOTAL DELAY (MIN/PIECE) 

MIN AVAILABLE FOR WORK 

STND PIECES/SHIFT 

STND PIECES/HOUR 

STND HOUR/PIECES 



ELEMENT 1 

.0733 

.0366 

ELEMENT 2 

.3320 

.1411 

ELEMENT 3 

.7270 

.3453 

ELEMENT 4 

.1300 

.1300 

ELEMENT 5 

.5114 

.4347 

ELEMENT 6 

.0430 

.0204 

ELEMENT 7 

.2566 

.1219 

ELEMENT 8 
1.5260 
.2746 

DELAY MIN/PIECE 



1.5048 
29.871 
34. 
.064 
446. 
284.155 
35.519 
.0281 



4& 





ELEMENT DESCRIPTION 


ELE. 
NO. 


ELEMENT TIME 


AVER. 


LEVEL- 
ED 
AVER. 


PER- 
FORM- 
ANCE 
EVAL. 


FREQ. 


MIN5/PC 
ALLOWED 
TIME 


t 

LEFT SIDE 1 RIGHT SIDE 

I. 1 ■ 


1 


o 
z 


o 
o 


4 


5 


✓ 
6 


7 


8 


9 


IU 




1 




1 








m 


















100 


1/2 






h lenient 




l 
I 


C 


H7 
• U/ 


0.0/ 


7 17 


n 9c 
1 1 • c3 




1ft 75 


9? ?ft 


lU .UO 


2Q fift 


?1fi9 




» 




I 


























85 


1/2 






Element #2 




i 

— .I. 




3ft 


3 92 


7.52 


11.57 


15.13 


19.07 


22.72 


26.38 


30.02 


34.02 




i 




1 


























95 


1/2 






Element #i3 




_ ■ 1 


C 


l in 


A &9 






15 ftft 




23 44 


27 09 


30.75 


34.74 




1 




1 


























100 


1/1 






Element #4 




i 


c 


1 99 


d 7fi 


O .H 1 


1? 41 

1 *rl 


lfi no 


19 97 


23 58 


27<2Z 




>< 




1 




I 










B 
















85 


1/1 






Element ^5 




i — . 


c 


1 71 


5 29 


8.88 


12.93 


16.88 


90 47 


?d 10 


91 7R 


31 77 


35 54 








1 


























95 


1/2 






Element #jb 




I 


c 


1.74 


5.34 


8.91 


12.96 


16.93 


20.53 


24.16 


27.80 


31.81 


35.57 




l 




1 






C 




















95 


1/2 






Element #7 


c 


2.01 


5.58 


9.52 


13.22 


17.19 


20.79 


24.41 


2a05 


32.0/ 


35.83 




i 




i 




I 


























90 


1/5 






Element #8 




i 


c 


? Rl 


7 f)Q 




14 76 


18j58 


2231 


25.94 


29.60 


33.61 


37.36 




i 
i 




1 

1 


































, 1 


c 
























i 




i 

1 1 




1 


































u 


c 
























i 



CODE 



FOREIGN ELEMENTS 



Fumble 



DETAIL OF DELAYS: 



M) N/SHIFT 



PERSONAL 



24 



MtN/PC 



ATTAINABLE 

HOURLY PRODUCTION 



60 MINUTES Q 



(ALLOWED CYCLE TIME) 



ALLOWED CYCLE TIM^PC * 



Stuck Part 



P & CU 



10 



FINAL CALCULATION OF STANDARD: 



12 



Drop Part 



(\ / MIN \ /ALLOWED CYCLE 
ALLOWED/ MINI AVAILABLE J I TIME + DELAYS 
DELAY / SHIFy ^FOR WORK J \ IN Mltsj/PC 



) ( STD PCS^ 

J \/$H\nJ 



(STD PCS/HR) 



480 MIN. - 



TOTAL 



TOTAL 



STANDARD HOURS/PIECE . 



IE-7 



SESSION NUMBER F.3.7 

SPEAKERS 

NONE - SQUAWK SESSION 

DISCUSSION 

PREPARED A LIST OF RECOMMENDATIONS FOR IBM. DICK PHILLIPS, OF 
IBM, WAS WITH US. 



4ft 



SPECIAL ADDED 
IBM 1130 
IBM OUICKTRAN 



ATTRACTIONS 
SYSTEM 

DEMONSTRATION! 



4?1 



IBM QUIKTRAN DEMONSTRATION 

Parlor J, 4th Floor , Netherland Hilton Hotel 



QUIKTRAN is a time- sharing data processing system that brings 
the power of a modern large-scale computer directly to the desk 
of the engineer and scientist, the mathematician, the business 
and financial planner - anyone who solves problems with numbers. 



The QUIKTRAN system uses the FORTRAN language and has avail- 
able a library of widely used programs. 



To show you the QUIKTRAN system in operation, we have arranged 
the following DEMONSTRATIONS: 



1) Common library programs including: 



a) ROOT, a program which finds the nth root of m 
by Newton's iteration method. 

b) QUAD, which finds the real and imaginery roots 
of the equation ax2+bx+c. 

2) Programs written especially for the COMMON meeting 

designed to demonstrate the conversationality of QUIKTRAN, 



Demonstrations will be given: 



Tuesday, September 5 
Wednesday, September 6 
Thursday, September 7 
Friday, September 8 



6:00 p.m. - 9:00 p.m. 
9:00 a.m. - 9:00 p.m. 
9:00 a.m. - 6:00 p # m. 
9:00 a.m. - 5:00 p.m. 



4fo 



IBM 1130 SYSTEM 



An IBM 1130 has been provided for the COMMON Meeting. It will 
be available from Wednesday (Sept. 6) through Friday (Sept. 8), to 
all members for testing or demonstration purposes. 

The 1130 consists of a 1442 Card Read/Punch, an 1132 Printer, and 
8K disk. Two key punches, disk packs, and a System Reference 
Library are also available for your use. The following programs have 
been loaded on disk packs: 

Monitor (Mod. level 4) 
Commercial Subroutine Package 
Scientific Subroutine Package 
Statistical System 
Work Measurement Aids 

Structural Engineering System Solver (STRESS) 
Mechanical Design System 
Numerical Surface Techniques 
Critical Path Method/PERT 
Other Demo Packages & Utilities 

The equipment is located in Parlor I of the Netherland Hilton. You 
may sign up to reserve time for testing or demonstration. Please 
feel free to stop by any time; there will always be someone there to 
assist you. 
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227 W. 10TH 

HINSDALE, I LI- 
JOHNSTON , W H 

25 MAIN STREET 

ANSON I A , CONN 

JONAS, C R 

2667 N . UNION ROAD 
MIDLAND, MICH 

JONES, J L 

3214 RADIANCE ROAD 
LOUISVILLE, KY 

JONES, L W 

P.O. BOX 3621 
PORTLAND, ORE 

JONES, R L 

1514 WOODCLIFFE AVENUE 
BALTIMORE, MD 21228 

JONES , H V 

524 1/2 S. UNIVERSITY BLVD 
NORMAN, OKLA 73069 

KEESLING, M A 

5721 SOUTH K I MBARK 

CHICAGO, ILL 60637 



55419 



45230 



60521 



06401 



48640 



40220 



97208 



KEESLING, J W 

5721 SOUTH KIMBARK 
CHICAGO, ILL 



LIST OF REGISTRANTS 
SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 
CINCINNATI » OHIO 

KEITH, J H 

10820 S.W. 5? DRIVE 
MIAMI, FLA 

KELLEY, J R 

618 SOUTH MICHIGAN BLVD 
CHICAGO, ILL 60605 

KEMP, E V 

4820 URRANA ROAD 
SPRINGFIELD, OHIO 45502 

KENNY, A D 

401 EAST 74TH STREET 

MEW YORK, M.Y. 10021 

KERR, H B 

BOX 21 A TTV 

COOKEVILLE, TENN 38501 

KERR, M C 

BOX 21 A. TTV 

COOKEVILLE, TENN 38501 

KINDRED, A R 

2707 RUTGERS AVENUE 
BRADENTON, FLA 33505 

KISSNER, J R 

55 E. WASHINGTON 

HAGERSTOWN, MD 21740 

KLEIN, D R 

145 LOWRYS LANE 

ROSEMONT, PA 19010 

KOEPSELL, P L 

SOUTH DAK STATE UNIV. 
BROOKINGS, S.D. 57006 

KOERING, L 

3725 FRAZIER ROAD 
ENDWELL , N.Y. 

KOLLER, E B 

570 ST. JOHNS ROAD 

POINTE, QUE CANADA 



KRAMER, P H 

901 EVERNIA STREET 

WEST, FLA EACH 33401 



LIST OF REGISTRANTS 
SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 
CINCINNATI, OHIO 



KROENCKE, T H 

29-01 BORDEN AVENUE 

LONG, N.Y. 11101 

KUHN, R E 

RD 2 BOX 94-C 

JERSEY, PA 17740 

LACHNIET, W M 

HAMILTON STANDARD 
WINDSOR, CONN 

LAFON, J W 

825 RIO GRANDE BLVD N.W. 
ALBUQUERQUE t N.M. 87104 

LA FONTAINE, J C 

5824 NEVADA AVENUE NO. 
MINNEAPOLIS, MINN 55428 

LAING, C D 

567 TURNER DRIVE 

BURLINGTON, ONT CANADA 

LAMPTOM , G B 

161 FAIRWAY CIRCLE 

ROCK, S.C. 29730 

LAMP N E , J 

16 RANCH TRAIL ROAD 

WILLI AMSVILLE, N.Y. 14221 

LANDWEHR, M E 

MONTEREY £ COTTLE ROADS 
SAN JOSE , CAL 

LANE, S E 

3405 N.W. 40TH 
OKLAHOMA, OK LA 

LANE, W G 

2194 NORTH AVENUE 
CHICO, CAL 

LAPORTE, D R 

BOX 112 BAY ROAD 
BELCHERTOWN , MASS 

LAROCOUE, J G 

MAIN 

HAWKESBURY, ONT 



95030 
73102 
95926 
01007 
CANADA 



LIST OF REGISTRANTS 
SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 
CINCINNATI, OHIO 

LEACH, U H 

11101 INWOOD AVENUE 

SILVER, MD 20902 

LFBLAMC , M A 

69R0-14TH AVE. APT 4 
MONTREAL, DUE CANADA 

LEGER, R 

2442 TRENTON AVENUE 

MONTREAL, ONE CANADA 

LEHNER, M F 

5049 TROESDALE AVENUE 
BALTIMORE, MD 21206 

L EN WON t P D 

1833 WANNIMGER 

CINCINNATI, OHIO 45230 

LESTER, G 

1232 CHATEAU DRIVE 

SAN JOSE , CAL 95120 

LEWIS, E 

786 ENGLE WOOD 

BUFFALO, N.Y. 14223 
L I G D N , H H 

LOTT, TEX 76656 

LITTLE, J C 

723 NOTTINGHAM ROAD 
BALTIMORE, MD 21229 

LTVF7EY, W C 

1608 WALNUT STREET 
PHILADELPHIA, PA 19103 

LOGUE, W E 

DIETZ ROAD 

WARREN, OHIO 4448? 
LHNERGAN, P 



LOUIS, J Y 

175 OLD COUNTRY ROAD 
HICKSVILLE, N.Y. 11801 



LIST OF REGISTRANTS 
SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 
CINCINNATI » OHIO 



LUDWIGt D A 

251 NORTH CASS INGHAM ROAD 
COLUMBUS , OHIO 43209 

LUKIMS, J C 

3519 WILLOWOOD DRIVE 
LEXINGTON, KY 

LUNEBURG, I 
RFD1 

SOUTHBR I DGE , MASS 

LUNGER, G C 
RD. 2 

COLUMBIANA, OHIO 

LYDIKSEN, H W 

2 TOWNS POAD 
LEVI TTOWN , PA 

LYNCH, S A 

8028 VAN BUR EN 
MUNSTER, IND 

LYON, K W 

1357 HILL CR EST 
CINCINNATI, OHIO 

MACNAUGHTON, B B 
5050 POPLAR 
MEMPHIS, TEMM 

MAGEE, R H 

2131 RUE TER ROAD 
FT. WAYNE, IND 

MALL ON , R 

94 PERRY STREET 
HARRISONBURG, VA 

MANGOLD, D R 

2830 VICTORY PARKWAY 
CINCINNATI, OHIO 45206 

MAMIKOWSKI , P R 

112 E. POST ROAD 
WHITE, N.Y. 

MAMLEY, R A 

1 FEDERAL STREET 

YOMKERS, N.Y. 10702 



40502 



01550 



44408 



19056 



46321 



45 2 24 



3 8117 



46803 



22801 



LIST OF REGISTRANTS 
SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 
CINCINNATI, OHIO 



MANN, E F 

172 GATE HOUSE TRAIL 
HENRIETTA, N.Y. 14467 

MAPPUS, J H 

BOX 5207 

NORTH, S.C. STON 29406 

MARKS, M 

112 E. POST ROAD 

WHITE, N.Y. 10601 

MARKULIN, T 

1701 N STREET 
ENDICOTT, N.Y. 

MARTIN, D J 

3512 VALLEY TRAIL 
CHATTANOOGA, TENN 37405 

MARTIN, W E 

USN UNDERWATER SOUND LAB 
NEW YORK, N.Y. 09560 

MASKIELL, F M 

149 DEMAR BLVD 

CANONSBURG, PA 15317 

MATELCER, F W 

920 N 14TH 

DEKALB, ILL 60115 

MATHEWS, W M 

308 MARSHALL DRIVE 
SHILLINGTON, PA 19607 

MATHIASON, L J 

617 W. 5TH STREET 
CHILLICOTHE, OHIO 45601 

MATTATALL, G L 

47 FRASER COURT 
NEWCASTLE, N.B. 

MATTHIS, F 

669 BROUGHTON ROAD 

BETHEL, PA 15102 

MATTHEISS, P K 

42-6 REVERE ROAD 

DREXEL, PA 19026 



LIST OF REGISTRANTS 
SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 



CINCINNATI t OHIO 



MAUDLIN, C E 

TEXAS WOMANS UNIVERSITY 
DENTON, TEX 76204 



MCCALL, E H 

2676 ROTH PLACE 
WHITE, MINN AKE 



55110 



MCILVAIN, D R 

1528 WALNUT STREET 
PHILADELPHIA, PA 



19102 



MCKAY, C D 

25 GROSVENOR COURT 
KINGSTON, ONT 



CANADA 



MCLANGHLIN, E E 
2345 IRIS 
LAKEWOOD, COLO 



80215 



MCMINN, C S 

14 HILLVIEW DRIVE 
NORWICH, N.Y. 



13815 



MCMEILL, D W 

P.O. BOX 34380 
DALLAS, TEX 



75234 



MCPHILLIPS, T J 

719 US POST OEFICE £ CH 
CINCINNATI, OHIO 45202 



MCCUSKER, P A 

4254 CARPENTER AVENUE 
NEW YORK, N.Y. 



10466 



MELUSKEY, J T 

920 OLDE HICKORY ROAD 
LANCASTER, PA 



17601 



MENEGHELLI, H A 

3414 KENDALL CIRCLE 
CUYAHOGA, OHIO 



44221 



METEER, R C 

252 COUNTY CENTER ROAD 
WHITE, N.Y. 10603 



MEURER, R F 

327 WALMAR DRIVE 
BAY VILLAGE, OHIO 



LIST OF REGISTRANTS 



SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 
CINCINNATI * OHIO 

MICHAEL, L A 

52 BYPASS SO. 

LAFAYETTE, IND 47905 

MICHALOWSKI, E W 

293 HAMILTON AVENUE 
TONAWANDA, N.Y. 14150 

MICKEL , F B 

1730 LYTER DRIVE 

JOHNSTOWN, PA 15905 

MIKO, D E 

32 MARK 

ST. MARYS, PA 15857 

MILLER, S R 

CHINA, CAL 93555 

MILLS, M E 

2043 SUTTON AVENUE 
CINCINNATI, OHIO 45230 

MILLER, G C 

5917 SANDHURST LANE 222 
DALLAS, TEX 75206 

MILLER, H W 

630 RIDGEWAY COURT 

MONROE, OHIO 45050 

MODELL , D J 

300 UNION COMMERSE BLDG. 
CLEVELAND, OHIO 44115 

MONJEAU, G P 

31 PASTURE LANE 
POUGHKEEPSIE, N.Y. 12603 

MOORE, J C 

402 ORANGE STREET 

MADISON, FLA 32340 

MORTON, J R 

1939 E. FIRST STREET 
DAYTON, OHIO 45401 

MOSCHETTI, R J 
4TH STREET 

JEANNETTE, PA 15644 



LIST OF REGISTRANTS 
SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 
CINCINNATI » OHIO 

MUELLER, J D 

HIGHWAY 5 2 NORTH 

ROCHESTER, MINN 55901 

MULGREW, I D 

12700 KERCHEVAL 

DETROIT, MICH 48215 

NARDONE, A A 

166 HIGH STREET 

WESTERLY, R.I. 02891 

NEMETH, L E 

54 ROSSITER AVENUE 
PHOENIXVILLE, PA 19460 

NORTON, W A 

600 N. 18TH STREET 
BIRMINGHAM, ALA 35202 

NOVAK , M J 

834 EPPLEY AVENUE 

ZANESV I LLE , OHIO 43701 

ODESKY, R I 

1536 ALEXANDRIA 

LEXINGTON, KY 40504 

OKFEFFE, W H 

HOWARD STREET 

FRANKLIN, PA 16301 

OLDE, G L 

3412 BELLEFONTF DRIVE 
LEXINGTON, KY 40502 

ORLOFF, M J 

4141 EASTERN AVENUE S.E. 
GRAND, MICH 49508 

OWEN, J J 

P.O. BOX 570 

SAVANNAH, GA 31402 

PANFLLA, D B 

1069 LINDEN AVENUE 

AKRON, OHIO 44310 



PARISIAN, J E 

522 W. CHEMUNG STREET 
PAINTED, N.Y. 14870 



£)3 



LIST OF REGISTRANTS 



SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 
CINCINNATI, OHIO 



c 



PARKER, C D 

MILFORD, MICH 

PASSICK, J E 

1001 BROAD STREET 
JOHNSTOWN, PA 

PAULSEN, J E 

1200 17TH STREET N.l 
WASHINGTON, D.C. 

PEARSON, L W 

1001 JEFFERSON 
OXFORD, MISS 

PEDERSEN, P M 

124 RIVERSIDE DRIVE 
HOPEWELL, VA 

PEDIN, P S 

2000 FORRER BLVD 
DAYTON, OHIO 

PERFETTE, B 

669 EVERGREEN DRIVE 
TONOWANDA, N.Y. 

PETERS, C D 

527 RIVERSIDE DRIVE 
NEW YORK, N.Y. 

PHILLIPS, R W 

CLOVE ROAD 
VERBANK, N.Y. 

PITEL, R 

159 SCENIC DRIVE 
HORSEHEADS, N.Y. 

POL I SHOOK, B H 

105 WAVERLY ROAD 
SCARTDALE, N.Y. 

PONIKVAR, H E 

DIETZ ROAD 
WARREN, OHIO 

POPOVICH, G G 

4 HILLSIDE COURT 
ENDICOTT, N.Y. 



6A 



48042 



15907 



20036 



38655 



23860 



45401 



14150 



10027 



18450 



44482 



13760 



c 



&4 



\ 



LIST OF REGISTRANTS 
SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 
CINCINNATI, OHIO 

PORTER, C B 

ILLINOIS STATE UNIVERSITY 
NORMAL, ILL 61761 

POWELL, J 

1327 CATHERWOOD ORIVE 

SOUTH, INO 46614 

PRATT, R L 

7500 OLD XENIA PIKE 

DAYTON, OHIO 45432 

OUAYLE, B B 

6924 RAVENSCROFT 

ST. LOUIS, MO 63123 

QUO , P C 

63 CROMWELL ROAD 
CINCINNATI, OHIO 45218 

RAAB, P V 

1201 S. SECOND STREET 
MILWAUKEE, WISC 53204 

RANDALL, R F 

826 SOUTH TRAVIS 

SHERMAN, TEX 75090 

RANDALL, D C 

18835 KINGS ROAD 

HOMEWOOD, ILL 60430 

RAPP, K L 
RR 1 

WAVERLY, OHIO 45601 

RAVER, R E 

MINK HOLLOW ROAD 

HIGHLAND, MD 20777 

REDDING, D M 

4701 MARBURG AVENUE 
CINCINNATI, OHIO 45209 

RED I NGER , S J 

3539 GLENEDGE LANE 
CINCINNATI, OHIO 45213 



REDINGER,\ L A 

3539 GLENEDGE LANE 
CINCINNATI, OHIO 45213 



LIST OF REGISTRANTS 



SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 
CINCINNATI, OHIO 

REES, W A 

2310 FOXLEY ROAD 

TIMONIUM, MO 21093 

REINHARDT, B N 

24 COLLEGE HAVEN 

ANDERSON, IND 46012 

REYNOLDS, G J 

1700 WEST THIRD AVENUE 
FLINT, MICH 48502 

REYNOLDS, J M 

COMPUTER CENTER W GEORGIA CO 
CARROLLTON, GA 30117 

RIBERA, V R 

1809 HARDY DRIVE 

EDMOND, OKL A 73034 

RISPOLI, L M 

P.O. BOX 5207 

NORTH, S.C. STON 29406 

RISSOLO, L R 

3326 CROSSCOUNTRY DRIVE 
WILMINGTON, DEL 19803 

RITTER, T L 

MOUNT, OHIO 43050 

RODANTE , F C 

250 CONSTITUTION PLAZA 
HARTFORD, CONN 06103 

RODENBECK, R 

1400 SOUTH THIRD STREET 

ST. LOUIS, MO 63166 

ROESSING, K W 

4028 IMPALA DRIVE 
PITTSBURGH, PA 15239 

ROESCH, R A 

5225 TROOST AVENUE 
KANSAS, MO 

ROHR , M R 
RT. 1 

WASHINGTON, W VA 26181 



LIST OF REGISTRANTS 
SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 
CINCINNATI, OHIO 

ROSS, R D 

COMPUTER CENTER 

UNIVERSITY, MISS 38677 

ROTH, R E 

COMPUTER CENTRE 

GEMESEO, N.Y. 14454 

ROTH, R W 

TAYLOR UNIVERSITY 

UPLAND, IND 46989 

ROTHSCHILD, R C 

32 W. GRIMSBY 

BUFFALO, N.Y. 14223 

ROWEt L V 

5 BEECHNUT DRIVE 

WEST, OHIO 45383 

ROWLAND, L W 

436 SUMMIT DRIVE 
CHILLICOTHE, OHIO 45601. 

SAK , T L 

P.O. BOX 5536 

HOUSTON, TEX 77034 

SAMUELS, L B 

1271 AVE OF AMERICAS 

NEW YORK, N.Y. 10020 

SANDB ERG, A A 

3504 W. ADAMS STREET 
BELLWOOD, ILL 60104 

SAUNDERS, A F 

80 RANGE HILL DRIVE 
ROCKVILLE, CONN 06066 

SCARAMOZZINO, P J 

297 BOSTON AVENUE 

MEDFORD, MASS 02155 

SCEARCE, W A 

2440 GR INSTEAD DRIVE 
LOUISVILLE, KY 40204 

SCHEMMER, J A 

4660 SO. 60TH AVENUE 

OMAHA, NEBR 68117 



LIST OF REGISTRANTS 
SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 
CINCINNATI, OHIO 

SCHILDER, M 

2077 SIERRA ROAD 

PLYMOUTH, PA G 19462 

SCHODITSCHt G F 

1700 SOUTH SECOND STREET 

ST. LOUIS, MO 63177 

SCHROEDER, L R 

73 COMO AVENUE 

BUFFALO, N.Y. 14220 

SCHULTZt T E 

316 ANITA DRIVE 
WINSTON-SALEM, N.C. 27104 

SCOTT, R E 

298 LINCOLNI A ROAD 
ALEXANDRIA, VA 22304 

SEITZ, L J 

2480 WEST 70TH AVENUE 
DENVER, COLO 80221 

SELSMEYER, W T 

8 RIVERVIEW ROAD 

APALACHIN, N.Y. 13732 

SERDENGECTI, S 

3821 LYNOAK 

CLAREMONT, CAL 91711 

SEROUSSI, S F 

P.O. BOX 208 

BEDFORD, MASS 01730 

SHAFFER, M R 

675 GARDEN PKWY 
CIRCLEVILLE, OHIO 43113 

SHAFF, P H 

1960 SEYMOUR AVENUE 
CINCINNATI , OHIO 45237 

SHARP, E A 

CREIGHTON UNIVERSITY 

OMAHA, NEBR 68131 

SHEPHERD, K M 

1211 FEDERAL AVENUE 
ZANESVILLE, OHIO 43701 



LIST OF REGISTRANTS 
SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 
CINCINNATI t OHIO 



SHERMER, D A 

275 WINCHESTER AVENUE 

NEW HAVEN, CONN 06504 

SHIRER, F D 

P.O. BOX 1212 

HOUSTON , TEX 77024 

SHOUSE, J W 

596 SOUTH 10TH 

SAN JOSE, CAL 95112 

SIMMERMACHER , W R 
6 ROSE LANE 

CHAPPAOVA, N.Y. 10514 

SIMS, L 

3516 W. SHAN DOM 

MIDLAND, TEX 79701 

SLUDER, L R 

175 OLD COUNTRY ROAD 
HICKSVILLE, N.Y. 11801 

SMITH, A P 

112 EAST POST ROAD 
WHITE, N.Y. 

SMITH, R L 

710 AIRFIELD LANE 

MIDLAND, MICH 48640 

SNAILER, R J 

53 LACE LAME 

WESTBURY, M.Y. 11590 

SOLE, W E 

1466 EGMOND DRIVE 

SARNIAt ONT CANADA 

SOMMENBERG, L K 

1770 RADCLIFFE ROAD 

DAYTON, OHIO 45406 

SOUSLEY, J E 

6838 KIRKDALE DRIVE 

FORT, IMD 46805 

STACK E, W B x 

241 6TH AVENUE 

NEW YORK, N.Y. 10014 



LIST OF REGISTRANTS 
SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 
CINCINNATI, OHIO 



STANSBURY, J C 

2 PARK AVENUE 

NEW YORK, M.Y. 10016 

STAPLETON, W L 

1150 EGLINTON AVENUE EAST 
DON MILLS, ONT CANADA 

STAOTMER , J F 

112 EAST POST ROAD 

WHITE, N.Y. 10601 

STEELE, L 

18 ANTHONY DRIVE 
POUGHKEEPSIE, N.Y. 12601 

STEGINA, F J 

475 ELM STREET 

WEST, CONN 06516 

STEIN, T W 

30 BRAMFORD ROAD 
HASTINGS-ON-HUDSON, N.Y 

STEWART, W B 

ROSE STREET 
LEXINGTON, KY 

STRAUSS, W T 

1901 CHAPMAN AVENUE 
ROCKVILLE, MD 20852 

STRITE, R S 

2628 WOODLEY PLACE 

FALLS, VA 22046 

STROH, G B 

1727 HOLLYWOOD 

GROSSE, MICH WOODS 48236 

SUM , B C 

FISHKILL PARK APTS 2B 
FISHKILL, M.Y. 

SWAIN, P J 

620 CHESTER STREET 

MONTREAL, OUE CANADA 



TAYLOR, J S 

7500 OLD XENIA PIKE 

DAYTON, OHIO 45432 



LIST OF REGISTRANTS 
SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 
CINCINNATI, OHIO 



TENNI SON, R D 

112 E. POST ROAD 

WHITE, N.Y. 10601 

THOMSON, W K 

627 SALEM AVENUE 

DAYTON, OHIO 45406 

THOMSON, G W 

1600 WEST 8 MILE ROAD 
FERNDALE, MICH 48220 

TILTON, B A 

1828 NICHOLASVILLE ROAD 
LEXINGTON., KY 40503 

TRACY, M G 

RED 3, ROCK ROAD 

MANSFIELD, OHIO 44903 

TRAINER, F E 

2830 VICTORY PARKWAY 
CINCINNATI, OHIO 45206 

TUMNEY, J L 

627 SALEM AVENUE 

DAYTON, OHIO 45406 

TVEDT, R G 

MPHS ST UNIV ADM BLD 122 
MEMPHIS, TENN 38111 

VAN MESS, V V 

2 ROCKLEDGE ROAD 

PLEASANTVI LLE , N.Y. 10570 

VAUGHAN, M C 

3424 WILSHIRE BLVD 
LOS ANGELES , CAL 

VERBRUGGE, M G 
RR 4 

RENSSELAER, IND 

VERITY, A F 

114 MEYER AVENUE 
VALLEY, N.Y. 

VOGEL, F 

52 BYPASS SO. 
LAFAYETTE, IND 



90005 



47978 



11580 



47905 



LIST OF REGISTRANTS 
SEPTEMBER COMMON MEETING 
SEPTEMBER ' 6-7-8, 1967 
CINCINNATI, OHIO 

WAOSWORTH, MA 

600 NORTH SECOND STREET 
HARRI-SBURG » PA 63 17105 

WALKER » J P 

4948 POWELL ROAD 

DAYTON, OHIO 45424 

WALKER, R P 

34ia KNOX STREET 

ST. JOSEPH, MICH 49085 

WALL, D D 

39 EVERGREEN CIRCLE 
PRINCETON, M.J. 08540 

WARNER, G 

8033 LINDEN 

MUNSTER, IND 46321 

WARTAN, W A 

600 S.W. 4TH STREET 
BIRMINGHAM, ALA 35211 

WATKINS, J B 

7 EAST LAKEVIEW DR APT 1 
CINCINNATI, OHIO 45237 

WATKINS, C A 

1600 W. 8 MILE ROAD 
FERNDALE, MICH 48220 

WEAVER , S E 

12 BR I ARWOOD WAY 

LOS GATOS, CAL 95030 

WEBER » D L 

1400 SHERIDAN ROAD 

NORTH, ILL 60064 

WEGNER » R D 

1300 E. STREET N.W. 
WASHINGTON, D.C. 

WEHE, H W 
RD 3 

LIGONIER, PA 15658 



WEISS, J H 

ANGOLA, IND 



46703 



LIST OF REGISTRANTS 
SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 
CINCINNATI, OHIO 



WERNICKE, G K 

4561 SEVILLE DRIVE 
ENGLEWOOD, OHIO 45322 

WERNER, R T 

3201 BOUDINOT AVENUE 
CINCINNATI, OHIO 45211 

WEST, R W 

107 SEMINARY AVENUE 
BINGHAMTON, N.Y. 13905 

WESTERHAM, E A 

1042 N. JEFFERSON 

OTTWMUA, IOWA 52501 

WESTON, D J 

SARNIA, ONT CANADA 

WHELAM, L 

BOX 2408 
GARY, I NO 

WIGDAHL, A B 

1201 S. SECOND STREET 
MILWAUKEE, WISC 53204 

WILLIAMSON, R T 

2500 STEPHEN ROAD 
LOUISVILLE, KY 40214 

WILLARD, L B 

WAHPETON, N.D. 58075 

WILSON, R J 

6350 MAPLE DRIVE 
INDIANAPOLIS, IND 

WIMDHAM, C E 

213 SIVLEY 

OXFORD, MISS 38655 

WOLF, G L 

6684 LAMDERWOOO LANE 

SAN JOSE, CAL 95120 

WOOD, E J 

549 W. WASHINGTON BLVO 
CHICAGO, ILL 60606 



LIST OF REGISTRANTS 



SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 
CINCINNATI, OHIO 

WOOD, P C 

30 GLEVELLYN ROAD 

LOWELL, MASS 01852 

WOODROW, P J 

50 WASHINGTON ROAD 
PRINCETON, N.J. 08540 

WRIGHT, J R 

3110 SO. 27TH STREET 

LA CROSSE, WISC 54601 

WRIGHT, E J 

MILTON TURNPIKE 

MIL TON , M.Y. 12547 

WYNN, W E 

15 ASH 

PARK, ILL 60466 

YAMANAKA, J H 

11815 S.W. FONNER STREFT 
TIGARD, ORE 97223 

Y AMKOV ICH , J M 

2314 HENDERSON 

BETHLEHEM, PA 18017 

YOUNGRERG, R W 

8 5 AUBURN LANE 

EAST, M.Y. H 11732 

YDUSSEF , K E 

1441 SMITHFIELD STREET 
PITTSBURGH, PA 15222 

ZACHLIN, A C 

3720 GROSVEMOR 

CLEVELAND, OHID 44118 

7.IFLINSKI, F T 

7753 WFSTWIND LANE 
CINCINNATI, OHIO ^5242 



LIST OF REGISTRANTS 
SFPTEMBFR COMMON MEETING 
SEPTEMBER 6-7-8, 1967 
CINCINNATI, OHIO 







PAMEI.LA, n R 

1069 LINDEN AVFMJE 
AKRON, OH I 

LAFON, J W 

825 RIO GRANDE BLVD 
AL RUOUEROl IE , N.M. 

CEELY, F F 

6206 BR EN MAR DRIVE 
ALEXANDRIA, VA 

SCOTT, R E 

298 L I NCOLN I A ROAD 
ALEXANDRIA, VA 

GREEN, D M 

7991 COLONY DRIVE 
ALGONAC, MICH 

GOSSETT, E C 
37 ALLEN 
ALLENDALE, N.J. 

BRENNAN, R D 

2670 HANOVER 
ALTO, CALIF 

HARRRON, T R 

ANDERSON COLLEGE 
ANDERSON , IND 

REINHARDT, B N 

24 COLLEGE HAVEN 
ANDERSON, IND 

WEISS, J H 

ANGOLA, IND 

CARLSON, D M 

327 S. FOURTH AVE 
ANN ARBOR, MICH 

CUNNINGHAM, A J 

25 MAIN ST 
ANSONIA, CONN 

JOHNSTON, W H 

25 MAIN STREET 
ANSONIA, CONN 



44310 



N.W. 

871 OA 



22312 



22304 



04701 



46011 



46012 



46703 



48108 



06401 



06401 



LIST OF REGISTRANTS 
SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 
CINCINNATI , OHIO 



SELSMEYER, W T 

8 RIVERVIEW ROAD 

APALACHIN, N.Y. 13732 

BABER, G M 

3000 SPOUT RUN PARKWAY 
ARLINGTON, VA 

DONNELLY, M J 

906 BELGIAN AVENUE 
BALTIMORE, MD 

DOWD, C K 

3711 LOCHEARN DRIVE 
BALTIMORE, MD 

GIBSON, S 

3117 MILFORD AVE. 
BALTIMORE, MD 

JONES, R L 

1514 WOODCLIFFE AVENUE 
BALTIMORE, MD 21228 

LEHNER, M F 

5049 TRUESDALE AVENUE 
BALTIMORE, MD 21206 

LITTLE, J C 

723 NOTTINGHAM ROAD 
BALTIMORE, MD 

COX , R C 

1429 KEED AVENUE 
BATON, LA 

MEURER, R F 

327 WALMAR DRIVE 
BAY VILLAGE, OHIO 

CONROD, R L 

P.O. BOX 208 
BEDFORD, MASS 

SEROUSSI, S F 

P.O. BOX 208 
BEDFORD, MASS 

LAPORTEt D R 

BOX 112 BAY ROAD 
BEL CHER TOWN, MASS 



22201 
21218 
21207 
21207 



21229 
70806 

01730 
01730 
01007 



LIST OF REGISTRANTS 
SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 
CINCINNATI, OHIO 



SANDBERG, A A 

3504 W. ADAMS STREET 
BELLWOOO, ILL 60104 

COOPER, T 

USDAARSBSSARCBLDG226 
BELTSVILLE, MD 20705 

MATTHIS, F 

669 BROUGHTON ROAD 

BETHEL, PA 15102 

YANKOVICH, J M 

2314 HENDERSON 

BETHLEHEM, PA 18017 

CLARK, W H 

4 EDGEBROOK ROAD 
BINGHAMTON, N.Y. 13903 

WEST, R W 

107 SEMINARY AVENUE 
BINGHAMTON, N,Y. 13905 

NORTON, W A 

600 N. 18TH STREET 
BIRMINGHAM, ALA 35202 

WARTAN, W A 

600 S.W. 4TH STREET 
BIRMINGHAM, ALA 35211 

GANATR A, J K 

458 FOX HILL DRIVE 

BLOOMF I ELD, MICH 48013 

CASTELLAN, N J 

DEPT OF PSYCHOLOGY I U 
BLOOMINGTON, IND 47401 

DOUCETTE, J E 

109 CHANDLER STREET 

BOSTON, MASS 02116 

GOLDMAN, N 

111 CUMMINGTON STREET 
BOSTON, MASS 02215 

GREEN, J 

JAMAICAWAY TOWER 151 

BOSTON, MASS 02130 



S3T) 



LIST OF REGISTRANTS 
SEPTEMBER COMMON MEETING 



SEPTEMBER 6-7-8, 1967 
CINCINNATI ♦ OHIO 



KINDRED, A R 

2707 RUTGERS AVENUE 
BRADENTON, FLA 33505 

DUQUETTE, D J 

THIRD AVE S FOR DHAM ROAD 
BRONZ, N.Y. 10458 

FALCONELLO, P 

THIRD AVE £ FORDHAM ROAD 
BRONZ, N.Y. 10458 

OLDBERG, M 

THIRD AVE £ FORDHAM ROAD 
BRONZ , N.Y. 10458 

BOND, W F 

656 STORM AVE 

BROOKHAVEN, MISS 39601 

KOEPSELL, P L 

SOUTH DAK STATE UNIV. 
BROOKINGS, S.D. 57006 

LEWIS, E 

786 ENGLEWOOD 

BUFFALO, N.Y. 14223 

ROTHSCHILD, R C 

32 W. GRIMSBY 

BUFFALO, N.Y. 14223 

SCHROEDER, L R 

73 COMO AVENUE 

BUFFALO, N.Y. 14220 

BRENNER, R L 

P.O. BOX 561 

BURLINGTON, IOWA 52601 

LAING, C D 

567 TURNER DRIVE 

BURLINGTON, ONT CANADA 

FISHER, J N 

363 THIRD STREET 

CAMBRIDGE, MASS 02148 

FRASER, W I 

21 ETON COURT 

CAMLACHIE, ONT CANADA 



LIST OF REGISTRANTS 
SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 
CINCINNATI, OHIO 

MASKIELL, F M 

149 DEMAR BLVD 

CANONSBURG, PA 15317 

REYNOLDS, J M 

COMPUTER CENTER W GEORGIA CO 
CARROLLTON, GA 30117 

SIMMERMACHER, W R 
6 ROSE LANE 

CHAPPAOVA, N . Y . 10514 

MARTIN, D J 

3512 VALLEY TRAIL 
CHATTANOOGA, TENN 37405 

KEESLING, M A 

5721 SOUTH KIMBARK 

CHICAGO, ILL 60637 

KEESLING, J W 

5721 SOUTH KIMBARK 

CHICAGO, ILL 60637 

KELLEY, J R 

618 SOUTH MICHIGAN BLVO 
CHICAGO, ILL 60605 

WOOD, E J 

549 W. WASHINGTON BLVD 
CHICAGO, ILL 

LANE, W G 

2194 NORTH AVENUE 
CHICO, CAL 

AT6R, G T 

35 PAGE RD 
CHILLICOTHE, OHIO 

CLARKE, J R 

449 W. 5TH ST 
CHILLICOTHE, OHIO 

DRAY, R D 

47 PAGE ROAD 
CHILLICOTHE, OHIO 

JINKS, W V 

22 E. 7TH STREET 
CHILLICOTHE, OHIO 



60606 
95926 
45601 
45601 
45601 
45601 



LIST OF REGISTRANTS 
SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 
CINCINNATI ♦ OHIO 

MATHI ASONt L J 

617 W. 5TH STREET 
CHILLICOTHE, OHIO 45601 

ROWLAND, L W 

436 SUMMIT DRIVE 
CHILLICOTHE, OHIO 45601 

MILLER, S R 

CHINA, CAL 93555 

CLEGG, J B 

346 COMPTON RD 

CINCINNATI, OHIO 45215 

DENING, J W 

3451 MCHENRY AVENUE 
CINCINNATI, OHIO 45225 

DUNSMORE, D A 

414 WALNUT STREET 
CINCINNATI, OHIO 45202 

HAMANT, W E 

8302 MAYFAIR 

CINCINNATI, OHIO 45216 

HAMPEL, C R 

222 E. CENTRAL PKWY 
CINCINNATI, OHIO 45202 

HICKMAN, G A 

222 E • CENTRAL PKWY 
CINCINNATI, OHIO 45202 

INGRAM, B C 

1018 ROSETREE LANE 
CINCINNATI, OHIO 45243 

JOHNSON* B M 

6126 THOLE ROAD 

CINCINNATI, OHIO 45230 

LENNON, R D 

1833 WANNINGER 

CINCIUN'AT.It OHIO 4*13© 

LYON, K W 

1357 HILLCREST 
CINCINNATI* OHIO 



LIST OF REGISTRANTS 
SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 
CINCINNATI » OHIO 

MANGOLD, D R 

2830 VICTORY PARKWAY 
CINCINNATI, OHIO 45206 

MCPHILLIPS, T J 

719 US POST OFFICE 6 CH 
CINCINNATI, OHIO 45202 

MILLS, M E 

2043 SUTTON AVENUE 
CINCINNATI, OHIO 45230 

QUO , P C 

63 CROMWELL ROAD 
CINCINNATI, OHIO 45218 

REDDING, D M 

4701 MARBURG AVENUE 
CINCINNATI , OHIO 45209 

REDINGER, S J 

3539 GLENEDGE LANE 
CINCINNATI, OHIO 45213 

REDINGER, L A 

3539 GLENEDGE LANE 
CINCINNATI, OHIO 45213 

SHAFF, P H 

1960 SEYMOUR AVENUE 
CINCINNATI, OHIO 45237 

TRAINER, F E 

2830 VICTORY PARKWAY 
CINCINNATI, OHIO 45206 

WATKINS, J B 

7 EAST LAKEVIEW DR APT 1 
CINCINNATI, OHIO 45237 

WERNER, R T 

3201 BOUDINOT AVENUE 
CINCINNATI, OHIO 45211 

ZIELINSKI, E Tx 

7753 WESTWIND LANE 
CINCINNATI, OHIO 45242 

SHAFFER, M R 

675 GARDEN PKWY 
CIRCLEVILLE, OHIO 43113 



LIST OF REGISTRANTS 
SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 
CINCINNATI, OHIO 



ALLBR I TTON, E J 
S3 BOX 191 

CLARDSVILLE, MO 63336 

SERDENGECTI, S 

3821 LYNOAK 

CLAREMONT, CAL 91711 

BUFE, E 

2300 CHESTER AVE 

CLEVELAND, OHIO 44114 

HOFFERT, E R 

1705 URB • NA ROAD 

CLEVELAND, OHIO 44112 

MODELL, D J 

300 UNION COMMERSE BLDG. 
CLEVELAND, OHIO 44115 

ZACHLIN, A C 

3720 GROSVENOR 

CLEVELAND, OHIO 44118 

HYMAN , I M 

LUKENS STEEL COMPANY 
COATESVILLE, PA 

LUNGER, G C 
RD. 2 

COLUMBIANA, OHIO 

BOBAY, J P 

1000 5TH ST 
COLUMBUS, IND 

BRECHB ILL t D O 

625 CLEVELAND 
COLUMBUS, OHIO 

DAGENFI ELD, R L 

1214 JAEGER ST 
COLUMBUS, OHIO 

GEIGER, A J 

2186 MI DOLE HURST DRIVE 
COLUMBUS, OHIO 43201 

HAMILTON, T K 

315 GRAHAM AVENUE 

COLUMBUS t OHIO 43203 



19320 
44408 
47201 
43215 
43206 



LIST OF REGISTRANTS 
SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 
CINCINNATI , OHIO 



LUDWIG, D A 

251 NORTH CASS I MGHAM ROAD 
COLUMBUS, OHIO 43209 

KERR, H B 

BOX 21A TTV 

COOKEVILLE, TENN 38501 

KERR, M C 

BOX 21A TTV 

COOKEVILLE, TENN 38501 

MENEGHELL I , H A 

3414 KENDALL CIRCLE 
CUYAHOGA, OHIO 44221 

FLEMING, C 

P.O. BOX 34380 

DALLAS, TEX 75234 

MCMEILL, D W 

P.O. BOX 34380 

DALLAS, TEX 75234 

MILLER, G C 

5917 SANDHURST LANE 222 
DALLAS, TEX 75206 

BENEDICT, D E 

2000 FORRER BLVD 

DAYTON, OHIO 45401 

DONALDSON, D L 

1570 WOODMAN DR 15 

DAYTON, OHIO 45432 

MORTON, J R 

1939 E. FIRST STREET 
DAYTON, OHIO 45401 

PEDIN, P S 

2000 FORRER BLVD 

DAYTON, OHIO 45401 

PRATT, R L 

7500 OLD XENIA PIKE 

DAYTON, OHIO 45432 

SONNENBERG, L K 

1770 RADCLIFFE ROAD 

DAYTON, OHIO 45406 



LIST OF REGISTRANTS 
SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 
CINCINNATI » OHIO 

TAYLOR , J S 

7500 OLD XENIA PIKE 

DAYTON, OHIO 45432 

THOMSON, W K 

627 SALEM AVENUE 

DAYTON, OHIO 45406 

TUNNEY, J L 

627 SALEM AVENUE 

DAYTON, OHIO 45406 

WALKER, J P 

4948 POWELL ROAD 

DAYTON, OHIO 45424 

HEETDERKS, J W 

3001 MILLER P.O.BOX 218 
DEARBORN, MICH 

BUCKLEU, R E 

1414 BEECH ST. S.E. 
DECATUR, ALA 35601 

MATELCER, F W 

920 N 14TH 

DEKALB, ILL 60115 

MAUDLIN, C E 

TEXAS WOMANS UNIVERSITY 
DENTON, TEX 76204 

SEITZ, L J 

2480 WEST 70TH AVENUE 
DENVER, COLO 80221 

ALLEN, J E 

1206 MULBERRY ST 

DES MOINES, IOWA 50309 

BAKER, L H 

1206 MULBERRY ST 

DES MOINES, IOWA 50308 

IBSEN, J K 

5985 N.W. 62ND AVENUE 

DES MOINES, IOWA 50324 



MULGREW, I 

12700 KERCHEVAL 
DETROIT, MICH 



48215 



LIST OF REGISTRANTS 
SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8 f 196? 
CINCINNATI OHIO 



STAPLETON, W L 

1150 EGLINTON AVENUE EAST 
DON MILLS, ONT CANADA 

MATTHEISS, P K 

42-6 REVERE ROAD 

DREXEL, PA 19026 

YOUNGBERGt R W 

85 AUBURN LANE 

EAST, N.Y. H 11732 

RIBERA, V R 

1809 HARDY DRIVE 

EDMOND, OKLA 73034 

JAEGER, R B 
RD 1 

EMPORIUM, PA 15834 

ALVAREZ, J J 

IBM GLENDALE LAB DEPT 265 
ENDICOTT, N.Y. 13760 

DONEGAN, A W 

107 SMITHF IELD DRIVE 
ENDICOTT, N.Y. 13760 

HOKE, W E 

104 SMI THF IELD DRIVE 
ENDICOTT, N.Y. 

MARKUL IN , T 

1701 N STREET 
ENDICOTT, N.Y. 

POPOVICH, G G 

4 HILLSIDE COURT 

ENDICOTT, N.Y. 13760 

KOERING, L 

3725 FRAZIER ROAD 
ENDWELL, N.Y. 

WERNICKE, G K 

4561 SEVILLE DRIVE 
ENGLEWOOD, OHIO 45322 



BUESKING, C W 

4617 TAYLOR AVE 
EVANSVI LLE , IND 



47715 



I 1ST OF REGISTRANTS 
SEPTEMBER COMMON MEETING 



SEPTEMBER 6-7-8, 1967 
CINCINNATI « OHIO 



CARLSON, R 

5707 LINOENWOOD LANE 
FAIRFIELD, OHIO 

STRITE, R S 

2628 WOOOLEY PLACE 

FALLS, VA 22046 

CUMMINGS, L R 

FEOERALSBURG, MO 21632 

THOMSON, G W 

1600 WEST 8 MILE ROAD 
FERNDALE, MICH 48220 

WATKINS, C A 

1600 W. 8 MILE ROAD 
FERNDALE, MICH 48220 

SUM , B C 

FISHKILL PARK APTS 2B 
FISHKILL , N.Y. 

ARNTSON, W M 

1700 W. THIRD AVE. 

FLINT, MICH 48502 

AUSTIN, L B 

1700 W. THIRD AVE 

FLINT, MICH 48502 

REYNOLDS, G J 

1700 WEST THIRD AVENUE 
FLINT, MICH 48502 

JEFFUS, S E 

5626 MAYMARD 

FORT, TEX 79906 

SOUSLEY, J E 

6838 KIRKDALE DRIVE 

FORT, IND 46805 

OKEEFFE, W H 

HOWARD STREET 

FRANKLIN, PA 16301 

FOLTZ, T V 

4818 AVONDALE DRIVE 

FT. WAYNE, IND 46806 



o 



LIST OF REGISTRANTS 
SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 
CINCINNATI, OHIO 



o 



MAGEE, R H 

2131 BUETER ROAD 
FT. WAYNE, IND 

WHELAN, L 

BOX 2408 
GARY, IND 

DEUTSCH, E 

COMPUTER CENTRE 
GENESEO, N.Y. 

ROTH, R E 

COMPUTER CENTRE 
GENESEO, N.Y. 

ORLOFF, M J 

4141 EASTERN AVENUE S. 
GRAND, MICH 

COTTON, B W 

P.O. DRAWER G 
GRAPEVINE, TEX 

BICKFORD, P A 

GREENCASTLE, IND 

STROH, G B 

1727 HOLLYWOOD 
GROSSE, MICH WOODS 

HILL, W H 

6715 BLVD EAST 
GUTTENBERG, N.J. 

KISSNER, J R 

55 E. WASHINGTON 
HAGERSTOWN, MD 

CIPRIETTI, B J 

34 IPSWICH PLACE 
HAMILTON, ONT 

DELONG, W 

629 SIBLEY STREET 
HAMMOND, IND 

BERNARD, R J 

606 JODI DR 
HAMMOND, LA 



46803 



14454 



14454 



E. 

49508 



76051 



46135 



48236 



07093 



21740 



CANADA 



46320 



70401 



537 



LIST OF REGISTRANTS 



SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 
CINCINNATI » OHIO 

WADSWORTH, M A 

600 NORTH SECOND STREET 
HARRISBURG, PA 63 17105 

MALLON t R 

94 PERRY STREET 
HARRISONBURG, VA 22801 

RODANTE, F C 

250 CONSTITUTION PLAZA 
HARTFORD, CONN 06103 

STEIN, T W 

30 BRANFORD ROAD 
HASTINGS-ON-HUDSON, N.Y 

BERWICK, J M 
MAIN 

HAWKESBURY, ONT CANADA 

LAROCOUE, J G 
MAIN 

HAWKESBURY, ONT CANADA 

DYE , D R 

40 SAWMILL RIVER ROAD 
HAWTHORNE, N.Y. 

BLISS, R J 

5830 WESTHENR IETTA RD 
HENRIETTA, N.Y. 14606 

MANN, E F 

172 GATE HOUSE TRAIL 
HENRIETTA, N.Y. 14467 

DEGENNARO, M G 

175 OLD COUNTRY RD 
HICKSVILLE, N.Y. 11801 

LOUIS, J Y 

175 OLD COUNTRY ROAD 
HICKSVILLE, N.Y. 11801 

SLUDER, L R 

175 OLD COUNTRY ROAD 
HICKSVILLE, N,Y. 11801 

RAVER, R E 

MINK HOLLOW ROAD 

HIGHLAND, MO 20777 



LIST OF REiSI STRAWTS 
SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 
CINCINNATI » OHIO 



JOHNSON, D R 

227 W. 10TH 

HINSDALE, ILL 60521 

RANDALL * C 

18835 KINGS ROAD 

HOMEWOOD, ILL 60430 

PEDERSEN, P M 

124 RIVERSIDE DRIVE 
HOPEWELL, VA 23860 

PITEL, R 

159 SCENIC DRIVE 
HORSEHEADS, N.Y. 18450 

SAX , T L 

P.O. BOX 5536 

HOUSTON, TEX 77034 

SHIRER, F D 

P.O. BOX 1212 

HOUSTON, TEX 77024 

BERGER, D E 

2605 REYNOLDS CR. 

HUNTSVI LLE , ALA 35810 

CRAFT, J C 

2109 NORRIS RD N.W. 

HUNTSV I LLE , ALA 35810 

BARNEY, P L 

740 S. ALABAMA 

INDIANAPOLIS, IND 46206 

GRIBBEN, C J 

25 MONUMENT CIRCLE 
.INDIANAPOLIS, IND 46200 

WILSON, R J 

6350 MAPLE DRIVE 
INDIANAPOLIS, IND 



GILMARTIN, W R 

126 STRATFORD DRIVE 

IRWIN, PA 15642 

MOSCHETTI, R J 
4TH STREET 

JEANNETTE , PA 15644 



LIST OF REGISTRANTS 



SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 
CINCINNATI , OHIO 



KUHN, R E 

RD 2 BOX 94-C 

JERSEY, PA 17740 

MICKEL, F B 

1730 LYTER DRIVE 
JOHNSTOWN, PA l r 

PASSICK, J E 

1001 BROAD STREET 
JOHNSTOWN, PA 15 cr 

ROESCH, R A 

5225 TROOST AVENUE 
KANSAS, MO 

MCKAY, C D 

25 GROSVENOR COURT 

KINGSTON, ONT CANADA 

WRIGHT, J R 

3110 SO. 27TH* STREET 
LA CROSSE, WISC 

MICHAEL, L A 

52 BYPASS SO. 
LAFAYETTE, IND 

VOGEL, F 

52 BYPASS SO. 
LAFAYETTE, IND 

MCLANGHL IN, E E 
2345 IRIS 
LAKEWOOD, COLO 

MELUSKEY, J T 

920 OLDE HICKORY ROAD 
LANCASTER, PA 17601 

CHAIKIN, A J 

9300 GEORGE PALMER HWY 
LANHAM, MD 20034 

LYDIKSEN, H W 

2 TOWNS ROAD 

LEVITTOWN, PA 19056 

BALL, M J 

159 IDLE HOUR DRIVE 
LEXINGTON, KY 40502 



54601 



47905 



47905 



80215 



LIST OF REGISTRANTS 
SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 
CINCINNATI, OHIO 



LUKINS, J C 

3519 WILLOWOOD DRIVE 
LEXINGTON, KY 40502 

OOESKY, R I 

1536 ALEXANDRIA 

LEXINGTON, KY 40504 

OLDE, G L 

3412 BELLEFONTE DRIVE 
LEXINGTON, KY 40502 

STEWART, W B 

ROSE STREET 
LEXINGTON, KY 

TILTON, B A 

1828 NICHOLASVILLE ROAD 
LEXINGTON, KY 40503 

WEHE, H W 
RD 3 

LIGONIER, PA 15658 

ELWELL, W G 

7030 STARR 

LINCOLN, ME BR 68505 

KROENCKE, T H 

29-01 BORDEN AVENUE 

LONG, N.Y. 11101 

VAUGHAN, N C 

3424 WILSHIRE BLVO 

LOS ANGELES, CAL 90005 

FOERSTER, C S 

112 VALLECITOS WAY 

LOS CATOS, CAL 95030 

GOESCH, G W 

17304 ZIMA AVENUE 

LOS GATOS, CAL 95030 

WEAVER, S E 

120 BRIAR WOOD WAY 

LOS GATOS, CAL 95030 

LIGOM, H H 



LOTT, TEX 



76656 



LIST OF REGISTRANTS 



SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 
CINCINNATI, OHIO 

JONES , J L 

3214 RADIANCE ROAD 
LOUISVILLE, KY 40220 

SCEARCE, W A 

2440 GRINSTEAD DRIVE 
LOUISVILLE, KY 40204 

WILLIAMSON, R T 

2500 STEPHEN ROAD 
LOUISVILLE, KY 40214 

WOOD , P C 

30 GLEVELLYN ROAD 

LOWELL, MASS 01852 

MOORE, J C 

402 ORANGE STREET 

MADISON, FLA 32340 

FODOR, J E 

ENGINEERING BUILDING 
MADISON, WIS 

HERTEL, E S 

29 DUNN AVENUE 

MANGATUCK, CONN 06770 

TRACY, M G 

RED 3, ROCK ROAD 

MANSFIELD, OHIO 44903 

SCARAMOZZINO, P J 

297 BOSTON AVENUE 

MEDFORD, MASS 02155 

MACNAUGHTON, B B 
5050 POPLAR 

MEMPHIS, TENN 38117 

TVEDT, R G 

MPHS ST UNIV ADM BLD 122 
MEMPHIS, TENN 38111 

KEITH, J H 

10820 S.W. 52 DRIVE 
MIAMI, FLA 

BLACKNEY, W C 

TSSD, ARC, 2020 BLDG DOW CHM 
MIDLAND, MICH 



c 



LIST OF REGISTRANTS 
SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 
CINCINNATI, OHIO 



JONAS, C R 

2667 N. UNION ROAD 

MIDLAND, MICH 48640 

SMITH, R L 

710 AIRFIELD LANE 

MIDLAND, MICH 48640 



BRIGGS, D R 

4306 BEDFORD 

MIDLAND, TEX 79701 

SIMS, D L 

3516 W. SHANDON 

MIDLAND, TEX 79701 

FOLL AND , G H 

MILFORD, MICH 48042 

PARKER, C D 

MILFORD, MICH 48042 

WRIGHT, E J 

MILTON TURNPIKE 

MILTON, N.Y. 12547 

RAAB, P V 

1201 S. SECOND STREET 
MILWAUKEE, WISC 53204 



WIGDAHL, A B 

1201 S. SECOND STREET 
MILWAUKEE, WISC 53204 

CORNELL, R L 

4137 BEARD AVENUE SOUTH 
MINNEAPOLIS, MINN 55410 

JOHNSON, J D 

6023 PENN AVENUE SO. 
MINNEAPOLIS, MINN 55419 



LAFONTAINE, J C 

5824 NEVADA AVENUE NO. 
MINNEAPOLIS, MINN 55428 

BROWN, L W 

P.O. BOX 2328 

MOBILE, ALA 36601 



LIST OF REGISTRANTS 
SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 
CINCINNATI, OHIO 



MILLER, H W 

630 RIDGEWAY COURT 

MONROE, OHIO 45050 

ARMBRUSTER, L F 

MONTGOMERY, W VA 25136 

BRANAGAN, R E 

2442 TRENTON AVENUE 
MONTREAL, QUEBEC 

FRASER, W C 

36 DOB I E 
MONTREAL, OUE 

LEGER, R 

2442 TRENTON AVENUE 

MONTREAL, OUE CANADA 

SWAIN, P J 

620 CHESTER STREET 

MONTREAL, OUE CANADA 

LEBLANC, M A 

6980-14TH AVE. APT 4 
MONTREAL, OUE 

RITTER, T L 

MOUNT, OHIO 

LYNCH, S A 

8028 VAN BUREN 
MUNSTER, IND 

WARNER, G 

8033 LINDEN 
MUNSTER, IND 

GLENN, J S 

40 STARK STREET 
NASHUA, N.H. 

HUMPHREY, M E 

803 PAINTER AVENUE 
NATRONA, PA S 15065 

SHERMER, D A 

275 WINCHESTER AVENUE 

NEW HAVEN, CONN 06504 



CANADA 



43050 



46321 



46321 



03060 



© 



LIST OF REGISTRANTS 
SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 
CINCINNATI, OHIO 



CAPLAN, F L 

215 ROSE HILL AVE 

NEW ROCHELLE, N.Y. 10804 

BARR, S 

222 BROADWEL 

NEW YORK, N.Y. 10038 

BOSCHAN, C 

144 EAST 24 ST 

NEW YORK, N.Y. 10010 

CRUMB, H F 

33 LIBERTY ST 

NEW YORK, N.Y. 10045 

FELICE, L 

1341 BALCOM AVENUE 

NEW YORK, N.Y. 10461 

HUSSEIN, H A 

415 E. 64TH STREET 

NEW YORK, N.Y. 10021 

KENNY, A D 

401 EAST 74TH STREET 

NEW YORK, N.Y. 10021 

MARTIN, W E 

USN UNDERWATER SOUND LAR 
NEW YORK, N.Y. 09560 

MCCUSKER, P A 

4254 CARPENTER AVENUE 

NEW YORK, N.Y. 10466 

PETERS, C D 

527 RIVERSIDE DRIVE 6A 

NEW YORK, N.Y. 10027 

SAMUELS , L B 

1271 AVE OF AMERICAS 

NEW YORK, N.Y. 10020 

STACKE, W B 

241 6TH AVENUE 

NEW YORK, N.Y. 10014 

STANSBURY, J C 

2 PARK AVENUE 

NEW YORK, N.Y. 10016 



LIST OF REGISTRANTS 
SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 
CINCINNATI, OHIO 



MATTATALL , G L 

47 FRASER COURT 
NEWCASTLE, N.B. 

FITZPATRICK, E D 

ILLINOIS STATE UNIVERSITY 
NORMAL, ILL 61761 

PORTER, C B 

ILLINOIS STATE UNIVERSITY 
NORMAL, ILL 61761 

JONES, H V 

524 1/2 S. UNIVERSITY BLVD 
NORMAN, OKLA 73069 

MAPPUS, J H 

BOX 5207 

NORTH, S.C. STON 29406 

RISPOLI, L M 

P.O. BOX 5207 

NORTH, S.C. STON 29406 

WEBER, D L 

1400 SHERIDAN ROAD 
NORTH, ILL 

GWILLI AM , J C 

16 ELM STREET 
NORWICH, N.Y. 

MCMINN, C S 

14 HILLVIEW DRIVE 
NORWICH, N.Y. 

BRADY, J J 

4620 FOREST AVE 
NORWOOD, OHIO 

GLOSTER, A S 

P.O. BOX 117 
OAK RIDGE, TENN 

LANE, S E 

3405 N.W. 40TH 
OKLAHOMA, OKLA 

BYTHER, T E 

31 OAK ST 
OLD TOWN, ME 



60064 
13815 
13815 
45212 
37830 
73102 
04468 



LIST OF REGISTRANTS 
SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8 , 1967 
CINCINNATI^ OHIO 



JENSEN, E L 

4660 SO. 60TH AVENUE 

OMAHA, NEBR 68117 

SCHEMMER, J A 

4660 SO. 60TH AVENUE 

OMAHA, NEBR 68117 

SHARP, E A 

CRE IGHTON UNIVERSITY 
OMAHA, NEBR 

CORDING, B L 

2705 DELLWOOD DR 
ORLANDO, FLA 

WESTERHAM, E A 

1042 N. JEFFERSON 
OTTWMUA, IOWA 

PEARSON, L W 

1001 JEFFERSON 
OXFORD, MISS 

WINDHAM, C E 

213 SIVLEY 
OXFORD, MISS 

ENYEDY, G 

AUBURN ROAD 
PA INESVI LLE , OHIO 

GENTILE, J F 

AUBURN ROAD 
PAINESVILLE, OHIO 

CLARK, A G 

132 DAVIS STREET 
PAINTED, N.Y. 

PARISIAN, J E 

522 W. CHEMUNG STREET 
PAINTED, N.Y. 14870 

WYNN, W E 

15 ASH 

PARK, ILL 60466 

GABBERT, D A 

2117 INDIANA STREET 
PARKERSBURG, W. VA 



68131 
32806 
52501 
38655 
38655 
44077 
44077 
14870 



LIST OF REGISTRANTS 



SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 
CINCINNATI, OHIO 

HORTON, M H 

4800 OAK GROVE DRIVE 
PASADENA, CAL 91103 

DEAKIN, G R 

302 MOUNTAIN DRIVE 

PEAR I SBURG , VA 24134 

HERWITZ, P S 

LAKEVIEW AVENUE W. 
PEEKSKILL, N.Y. 10566 

ABNER, J R 

5904 SEWELL RD 

PENS ACOLA , FLA 32504 

HILLIER, W J 

1616 WALNUT STREET 
PHILADELPHIA, PA 19103 

LIVEZEY, W C 

1608 WALNUT STREET 
PHILADELPHIA, PA 19103 

MCILVAIN, D R 

1528 WALNUT STREET 
PHILADELPHIA, PA 19102 

NEMETH , L E 

54 ROSSITER AVENUE 
PHOENIXVILLE, PA 19460 

BURROWS, W A 

PITTSBURGH, PA 15225 

GOLIER, R T 

TWO GATEWAY CENTER 
PITTSBURGH, PA 15222 

HAYWARD, A P 

435 6TH AVENUE 

PITTSBURGH, PA 15219 

ROESSING, K W 

4028 IMPALA DRIVE 
PITTSBURGH, PA 15239 

YOUSSEF, K E 

1441 SMI THF I ELD STREET 
PITTSBURGH, PA 15222 



LIST OF REGISTRANTS 
SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 



CINCINNATI, OHIO 



VAN NESS, V V 

2 ROCKLEDGE ROAD 
PLEASANTVI LLE , N.Y, 

SCHILDER, M 

2077 SIERRA ROAD 
PLYMOUTH, PA G 



10570 



19462 



KOLLER, E B 

570 ST. JOHNS ROAD 
POINTE, QUE 

COLE, C T 

106 KATAHDIN OR 
POLAND, OHIO 

HOFFMAN, B A 

P.O. BOX 3621 
PORTLAND, ORE 

JONES, L W 

P.O. BOX 3621 
PORTLAND, ORE 

DICOSTANZO, J A 

P.O. BOX 390 
POUGHKEEPSIE, N.Y. 

MONJEAU, G P 

31 PASTURE LANE 
POUGHKEEPSIE, N.Y. 



CANADA 



44514 



97208 



97208 



12602 



12603 



STEELE, L 

18 ANTHONY DRIVE 
POUGHKEEPSIE, N.Y. 12601 

HOFFMAN, L L 

GUGGENHEIM LABS 

PRINCETON, N.J. 08240 

WALL, D D 

39 EVERGREEN CIRCLE 
PRINCETON, N.J. 08540 



WOODROW, P J 

50 WASHINGTON ROAD 
PRINCETON, N.J. 



08540 



DWYER, J R 

9321 E. 84TH TERR 

RAYTOWN, MO 64138 



LIST OF REGISTRANTS 



SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 
CINCINNATI, OHIO 

VERBRUGGE, M G 
RR 4 

RENSSELAER, INO 47978 

JAGTIANI , H vJ 

P.O. BOX 2-AC 

RICHMOND, VA 23205 

GARDNER, D S 

211 WALNUT STREET 
RIDGEWOOD, N.J. 07450 

FELLER, G G 

1402 10TH AVENUE S.E. 
ROCHESTER, MINN 55901 

MUELLER, J D 

HIGHWAY 52 NORTH 

ROCHESTER, MINN 55901 

LAMPTON, G B 

161 FAIRWAY CIRCLE 

ROCK, S.C. 29730 

SAUNDERS, A F 

80 RANGE HILL DRIVE 
ROCKVILLE, CONN 06066 

GARGANO, H M 

1901 CHAPMAN AVENUE 
ROCKVILLE, MD 20852 

STRAUSS, W T 

1901 CHAPMAN AVENUE 
ROCKVILLE, MD 20852 

KLEIN, D R 

145 LOWRYS LANE 

ROSEMONT, PA 19010 

FAERBER, R B 

1266 AVALON DRIVE 

SAN JOSE, CAL 95125 

LANDWEHR, M E 

MONTEREY £ COTTLE ROADS 

SAN JOSE, CAL 95030 

LESTER, G 

1232 CHATEAU DRIVE 

SAN JOSE, CAL 95120 



LIST OF REGISTRANTS 
SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 
CINCINNATI, OHIO 



SHOUSE, J W 

596 SOUTH 10TH 

SAN JOSE , CAL 95112 

WOLF, G L 

6684 LANDERWOOD LAME 

SAN JOSE, CAL 95120 

BAILEY, D C 

MONTEREY AMD COTTLE ROAD 
SAN JOSE, CALIF 

BARMORE, D R 

4780 SNOW DRIVE 
SAN JOSE, CALIF 

ARTHUR, A J 

3270 CABRILLO AVE 
SANTA, CALIF 

GREEN, H A 

194 CECIL STREET 
SARMIA, ONT 

SOLE, W E 

1466 EGMOMD DRIVE 
SARNIA, ONT 

WESTON, D J 

SARNIA, ONT 

BURNS, R A 

ALGOMA STEEL CORP LTD 

SAULT, ONT RIE CANADA 

OWEN, J J 

P.O. BOX 570 

SAVANNAH, GA 31402 

HAGUE, M T 

31 KENT 

SCARSDALE, N.Y. 

POLISHOOK, B H 

105 WAVERLY ROAD 
SCARTDALE, N.Y. 

BALLENTINE, J D 

547 PAIGIE STREET 
SCHENECTADY, N.Y. 12307 



951 11 



95051 



CANADA 



CANADA 



CANADA 



LIST OF REGISTRANTS 



SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 
CINCINNATI , OHIO 

RANDALL, R F 

826 SOUTH TRAVIS 

SHERMAN, TEX 75090 

MATHEWS, W M 

308 MARSHALL DRIVE 

SHI LL I NGTON , PA 19607 

LEACH, U H 

11101 INWOOD AVENUE 

SILVER, MD 20902 

POWELL, J 

1327 CATHERWOOD DRIVE 

SOUTH, IND 46614 

GABRIEL, R F 

SOUTH ORANGE AVENUE 

SOUTH, N.J. 07079 

GERMANN, 

SOUTH ORANGE AVENUE 

SOUTH, N.J. 07079 

LUNEBURG, I 
RFD1 

SOUTHBR I DGE , MASS 01550 

ANDERSON, B K 

20 SOUTH ROAD 
SOUTHI NGTON, CONN 

CAMPBELL, M 

2240 SOUTH LONE PINE 
SPRINGFIELD, MO 65804 

CLARK, L A 

3520 W. ROUNTREE 
SPRINGFIELD, MO 65804 

KEMP, E V 

4820 URBANA ROAD 
SPRINGFIELD, OHIO 45502 

WALKER, R P 

3418 KNOX STREET 

ST. JOSEPH, MICH 49085 

BURGGRABE, W F 

1400 SOUTH THIRD ST 

ST. LOUIS, MO 63166 



LIST OF REGISTRANTS 
SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 
CINCINNATI, OHIO 

DEWEY, G C 

11444 LACKLAND ROAD 

ST. LOUIS, MO 63141 

EATON, T J 

400 WASHINGTON AVENUE 

ST. LOUIS, MO 63102 

GRAY, W C 

11444 LACKLAND ROAD 

ST. LOUIS, MC 63141 

OUAYLE, B B 

6924 RAVENSCROFT 

ST. LOUIS, MO 63123 

RODENBECK, R 

1400 SOUTH THIRD STREET 

ST. LOUIS, MO 63166 

SCHODITSCH, G F 

1700 SOUTH SECOND STREET 
ST. LOUIS, MO ' 63177 

MIKO, D E 

32 MARK 

ST. MARYS, PA U5857 

I MBERTSON, J R 

2189 DO SWELL AVENUE 

ST. PAUL, MINN 55108 

FORTUNE, F C 

19394 GULFSTREAM DRIVE 
TEOUESTA, FLA 

YAMANAKA, J H 

11815 S.W. FOMNER STREET 
TIGARD, ORE 97223 

REES, W A 

2310 FOXLEY ROAD 

TIMONIUM, MD 21093 

DANZE I S EN, L A 

WOODVILLE ROAD 

TOLEDO, OHIO 43601 

MICHALOWSKI , E W 

293 HAMILTON AVENUE 

TOM AW AN DA , N.Y. 14150 



LIST OF REGISTRANTS 



SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 
CINCINNATI, OHIO 



PERFETTE, B 

669 EVERGREEN DRIVE 
TONOWANDA, N.Y. 14150 

GINGERICH, D F 

5011 W. 26TH STREET 

TOPEKA t KANS 66614 

HUGH, G M 

53 HOLMESDALE CRES 

TORONTO, ONT CANADA 

ROSS, R D 

COMPUTER CENTER 

UNIVERSITY, MISS 38677 

ROTH, R W 

TAYLOR UNIVERSITY 

UPLAND, IND 46989 

VERITY, A F 

114 MEYER AVENUE 

VALLEY, N.Y. 11580 

DECK, J C 

661 CHESTNUT STREET 
VALPARAISO, IND. 46383 

PHILLIPS, R W 

CLOVE ROAD 
VERBANK, N.Y. 

WILLARD, L B 

WAHPETON, N.D. 58075 

FANUELE, V L 

12 WILDWOOD DRIVE 
WAPPINGERS, N.Y. 12590 

LOGUE, W E 

DIETZ ROAD 

WARREN, OHIO 44482 

PONIKVAR, H E 

DIETZ ROAD 

WARREN, OHIO 44482 

BRASK AMP, B 

1111 CONNECTICUT AVE N.W. 
WASHINGTON, D.C. 20036 



4) 



LIST OF REGISTRANTS 
SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 
CINCINNATI, OHIO 



PAULSEN, J E 

1200 17TH STREET N.W. 
WASHINGTON, D.C. 20036 

WEGNER, R D 

1300 E. STREET N.W, 
WASHINGTON, D.C. 

ROHR, N R 
RT. 1 

WASHINGTON, W VA 26181 

BAILIE, D L 

455 C STREET 

WASHOUGAL, WASH 98671 

GOODRUM, D L 

RR 1 BOX 460 
WATEVLIET, MICH 

RAPP, K L 

RR 1 

WAVERLY, OHIO 45601 

STEGINA, F J 

475 ELM STREET 

WEST, CONN 06516 

ROWE, L V 

5 BEECHNUT DRIVE 

WEST, OHIO 45383 

KRAMER, P H 

901 EVERN I A STREET 

WEST, FLA EACH 33401 

S NAILER, R J 

53 LACE LANE 

WESTBURY, N.Y. 11590 

NAR DONE , A A 

166 HIGH STREET 

WESTERLY, R.I. 02891 

BURGESON, J W 

220 EAST UNION ST 

WHEATON, ILL 60187 

MCC ALL , E H 

2676 ROTH PLACE 

WHITE, MI MM AKE 55110 



LIST OF REGISTRANTS 



SEPTEMBER COMMON MEETING 



SEPTEMBER 6-7-8, 1967 



CINCINNATI, OHIO 



CLOSMAN, S 

112 EAST POST ROAD 
WHITE, N.Y. 

EDWARDS, R A 

112 E. POST ROAD 

WHITE, M.Y. 10601 



FULL AM , D J 

112 E. POST ROAD 
WHITE, M.Y. 

MANIKOWSKI, P R 

112 E. POST ROAD 
WHITE, M.Y. 

MARKS, M 

112 E. POST ROAD 

WHITE, M.Y. 10601 



METEER, R C 

252 COUNTY CENTER ROAD 
WHITE, M.Y. 10603 

SMITH, A P 

112 EAST POST ROAD 
WHITE, M.Y. 

STAUTNER , J F 

112 EAST POST ROAD 

WHITE, N.Y. 10601 



TEMMISOM, R D 

112 E. POST ROAD 

WHITE, M.Y. 10601 

HART, T M 

23 GARRAHAN 

W ILKES-BARRE , PA 18702 

LAMPME, D J 

16 RANCH TRAIL ROAD 

WILLI AMSVI LLE , N.Y. 14221 



FINCH, D G 

3316 CROSS COUNTRY DRIVE 
WILMINGTON, DEL 19803 

RISSOLO, L R 

3326 CROSSCOUNTRY DRIVE 
WILMINGTON, DEL 19803 



LIST OF REGISTRANTS 



SEPTEMBER COMMON MEETING 
SEPTEMBER 6-7-8, 1967 
CINCINNATI, OHIO 

LACHNIET, W M 

HAMILTON STANDARD 
WINDSOR, CONN 

SCHULTZ, T E 

316 ANITA DRIVE 
WINSTON-SALEM, N.C. ?7104 

BLATCHLEY, C G 

300 BENT RD 

WYNCOTE, PA 19095 

MANLEY, R A 

1 FEDERAL STREET 

YONKERS, N.Y. 1070? 

FOR STROM , R W 

19401 DORAL COURT 
YORBA, CAL 

GROFT, G E 

COUNTRY CLUB MANOR APT J 2 
YORK , OA 17403 

FOWLER, W G 

3730 ME ADOWBROOK DRIVE 
7 AMESVI LLE , OHIO 

I ML AY, C E 

1045 RICHEY ROAD 
ZAMESVILLE, OHIO 

NOVAK, M J 

834 EPPLEY AVENUE 
ZAMESVILLE, OHIO 

SHEPHERD, K M 

1211 FEDERAL AVENUE 
ZAMESVILLE, OHIO 



S?7 



43701 



43701 



43701 



43701 



